diff options
author | Arun Isaac | 2024-09-13 03:58:18 +0100 |
---|---|---|
committer | Arun Isaac | 2024-09-13 03:58:18 +0100 |
commit | 7337e4ae6994f2e53b37f98b1134cc23c64de952 (patch) | |
tree | ae463b49c3947d0ee7fc5b43e8db6685848d0f8e | |
parent | d611d990b297b3d573d7d5af83e9376744d51dd5 (diff) | |
download | ravanan-7337e4ae6994f2e53b37f98b1134cc23c64de952.tar.gz ravanan-7337e4ae6994f2e53b37f98b1134cc23c64de952.tar.lz ravanan-7337e4ae6994f2e53b37f98b1134cc23c64de952.zip |
job-state: Pass on slurm API endpoint and jwt recursively.
* ravanan/job-state.scm (job-state-status): Pass on slurm API endpoint
and jwt recursively.
-rw-r--r-- | ravanan/job-state.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/ravanan/job-state.scm b/ravanan/job-state.scm index 8944035..45ccb37 100644 --- a/ravanan/job-state.scm +++ b/ravanan/job-state.scm @@ -76,7 +76,9 @@ ;; all state elements have completed. ((vector? state) (or (vector-every (lambda (state-element) - (case (job-state-status state-element) + (case (job-state-status state-element + #:slurm-api-endpoint slurm-api-endpoint + #:slurm-jwt slurm-jwt) ((completed) => identity) (else #f))) state) |