From e913a136143748a42625b6debb7030aa963a3dc1 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Thu, 19 Feb 2015 08:35:25 -0700 Subject: [PATCH] contract test suite: fix exit status on failure --- pkgs/racket-test/tests/racket/contract/all.rkt | 2 ++ 1 file changed, 2 insertions(+) diff --git a/pkgs/racket-test/tests/racket/contract/all.rkt b/pkgs/racket-test/tests/racket/contract/all.rkt index a68d9faee8..c6ec0e8aa5 100644 --- a/pkgs/racket-test/tests/racket/contract/all.rkt +++ b/pkgs/racket-test/tests/racket/contract/all.rkt @@ -215,3 +215,5 @@ (cond [(zero? failures) "all passed"] [else (format "~a failed" failures)])) +(unless (zero? failures) + (exit 1))