From f0ef712ed046554ebc5ad66fe4e3d9f511f4a1e9 Mon Sep 17 00:00:00 2001
From: Michael Stapelberg <michael@stapelberg.de>
Date: Sat, 14 Mar 2015 12:34:34 +0100
Subject: [PATCH] tests: exit with status 1 when tests fail

---
 testcases/complete-run.pl | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/testcases/complete-run.pl b/testcases/complete-run.pl
index 61f2ef52..eaf57bde 100755
--- a/testcases/complete-run.pl
+++ b/testcases/complete-run.pl
@@ -227,7 +227,7 @@ if ($numtests == 1) {
 
 END { cleanup() }
 
-exit 0;
+exit ($aggregator->failed > 0);
 
 #
 # Takes a test from the beginning of @testfiles and runs it.
@@ -324,8 +324,9 @@ sub take_job {
 }
 
 sub cleanup {
+    my $exitcode = $?;
     $_->() for our @CLEANUP;
-    exit;
+    exit $exitcode;
 }
 
 # must be in a begin block because we C<exit 0> above
-- 
2.39.2