[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[bug#53291] [PATCH] build: clojure-build-system: Exit with non-zero if t
From: |
Reily Siegel |
Subject: |
[bug#53291] [PATCH] build: clojure-build-system: Exit with non-zero if tests fail. |
Date: |
Sat, 15 Jan 2022 20:03:25 -0500 |
* guix/build/clojure-build-system.scm (check): Exit test process with a
non-zero exit code if tests fail.
---
guix/build/clojure-build-system.scm | 7 +++++--
1 file changed, 5 insertions(+), 2 deletions(-)
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)
--
2.34.0
- [bug#53291] [PATCH] build: clojure-build-system: Exit with non-zero if tests fail.,
Reily Siegel <=