From b01d45e027c386d216447d3e4bb5a58a94e96b3a Mon Sep 17 00:00:00 2001
From: Michael Stapelberg <michael@stapelberg.de>
Date: Sun, 12 Aug 2012 13:46:54 +0200
Subject: [PATCH] complete-run: handle bailouts

---
 testcases/complete-run.pl | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/testcases/complete-run.pl b/testcases/complete-run.pl
index 88fece4b..4bdf5c78 100755
--- a/testcases/complete-run.pl
+++ b/testcases/complete-run.pl
@@ -265,9 +265,16 @@ sub take_job {
 
             for (1 .. $lines) {
                 my $result = $parser->next;
-                if (defined($result) and $result->is_test) {
+                next unless defined($result);
+                if ($result->is_test) {
                     $tests_completed++;
                     status($display, "$test: [$tests_completed/??] ");
+                } elsif ($result->is_bailout) {
+                    Log status($display, "$test: BAILOUT");
+                    status_completed(scalar @done);
+                    say "";
+                    say "test $test bailed out: " . $result->explanation;
+                    exit 1;
                 }
             }