diff options
| -rw-r--r-- | .guix/cwl-conformance.scm | 26 |
1 files changed, 15 insertions, 11 deletions
diff --git a/.guix/cwl-conformance.scm b/.guix/cwl-conformance.scm index 12204d0..fd5cc7a 100644 --- a/.guix/cwl-conformance.scm +++ b/.guix/cwl-conformance.scm @@ -25,7 +25,8 @@ #:use-module (guix gexp) #:use-module (guix packages) #:use-module (guix profiles) - #:use-module (guix utils)) + #:use-module (guix utils) + #:use-module (ice-9 match)) (define* (cwltest-suite-gexp manifest-file #:key (skip-tests '())) (with-imported-modules '((guix build utils)) @@ -42,16 +43,19 @@ ;; https://github.com/common-workflow-language/cwltest/issues/249 (mkdir "tmpdir") (setenv "TMPDIR" "tmpdir") - (invoke #$(file-append cwltest "/bin/cwltest") - "--test" cwltest-suite - ;; With these tests, evil things happen and too much - ;; memory is consumed. So, disable for now. - "-S" (string-join skip-tests ",") - "--tool" #$(file-append ravanan "/bin/ravanan") - "--badgedir" "badges" - "--" - "--store=store" - (string-append "--guix-manifest=" #$manifest-file))) + (apply invoke + #$(file-append cwltest "/bin/cwltest") + "--test" cwltest-suite + "--tool" #$(file-append ravanan "/bin/ravanan") + "--badgedir" "badges" + ;; With these tests, evil things happen and too much memory is + ;; consumed. So, disable for now. + (append '#$(match skip-tests + (() '()) + (_ (list "-S" (string-join skip-tests ",")))) + (list "--" + "--store=store" + (string-append "--guix-manifest=" #$manifest-file))))) ((program _ ...) (format (current-error-port) "Usage: ~a CWLTEST-SUITE~%" |