Message ID | 87sftoijaa.fsf@reilysiegel.com |
---|---|
State | Accepted |
Headers | show |
Series | [bug#53291] build: clojure-build-system: Exit with non-zero if tests fail. | expand |
Context | Check | Description |
---|---|---|
cbaines/comparison | success | View comparision |
cbaines/git branch | success | View Git branch |
cbaines/applying patch | success | View Laminar job |
cbaines/issue | success | View issue |
Hi, Reily Siegel <mail@reilysiegel.com> skribis: > * guix/build/clojure-build-system.scm (check): Exit test process with a > non-zero exit code if tests fail. Applied, thanks! Ludo’.
diff --git a/guix/build/clojure-build-system.scm b/guix/build/clojure-build-system.scm index 91d6122afe..22e90581a5 100644 --- a/guix/build/clojure-build-system.scm +++ b/guix/build/clojure-build-system.scm @@ -99,8 +99,11 @@ (define* (check #:key (for-each (lambda (jar) (eval-with-clojure `(do (apply require '(clojure.test ,@libs*)) - (apply clojure.test/run-tests - ',libs*)) + (if (clojure.test/successful? + (apply clojure.test/run-tests + ',libs*)) + (System/exit 0) + (System/exit 1))) (cons jar test-dirs))) jar-names))) #t)