~ruther/guix-local

09b4d74bd352d40b45e081eaa094b086a42dad3d — Reily Siegel 4 years ago 008215c
build-system/clojure: Exit with non-zero if tests fail.

* guix/build/clojure-build-system.scm (check): Exit test process with a
non-zero exit code if tests fail.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
1 files changed, 5 insertions(+), 2 deletions(-)

M guix/build/clojure-build-system.scm
M guix/build/clojure-build-system.scm => guix/build/clojure-build-system.scm +5 -2
@@ 78,8 78,11 @@ priority over TEST-INCLUDE."
        (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)