From 518d81b2c6c2ab15c7b67c25fdf401e461530725 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Fri, 24 Jan 2025 20:18:39 +0000
Subject: slurm-api: Support tracing.

* ravanan/slurm-api.scm: Import (ravanan verbosity).
(submit-job, job-state): Add traces.
* bin/ravanan (%options): Support slurm-api in --trace option.
(print-usage): Document it.
---
 bin/ravanan | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'bin')

diff --git a/bin/ravanan b/bin/ravanan
index 71f7017..cbd4e72 100755
--- a/bin/ravanan
+++ b/bin/ravanan
@@ -80,7 +80,7 @@ exec guile --no-auto-compile -e main -s "$0" "$@"
                          result)))
         (option (list "trace") #t #f
                 (lambda (opt name arg result)
-                  (let ((accepted-values (list)))
+                  (let ((accepted-values (list "slurm-api")))
                     (if (member arg accepted-values)
                         (assoc-set result
                           (cons 'traces
@@ -129,7 +129,8 @@ Slurm API batch system options:
 Debugging options:
 
   --trace=SUBSYSTEM              enable tracing on subsystem;
-                                 repeat to trace multiple subsystems"
+                                 repeat to trace multiple subsystems
+                                 (accepted values: slurm-api)"
           program))
 
 (define (read-jwt file)
-- 
cgit v1.2.3