summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xselftest/filter-subunit1
-rwxr-xr-xselftest/selftest.pl8
2 files changed, 9 insertions, 0 deletions
diff --git a/selftest/filter-subunit b/selftest/filter-subunit
index 3ec74c46c7..872d07fdb1 100755
--- a/selftest/filter-subunit
+++ b/selftest/filter-subunit
@@ -53,4 +53,5 @@ msg_ops = subunithelper.FilterOps(out, opts.prefix, expected_failures,
try:
sys.exit(subunithelper.parse_results(msg_ops, statistics, sys.stdin))
except subunithelper.ImmediateFail:
+ sys.stdout.flush()
sys.exit(1)
diff --git a/selftest/selftest.pl b/selftest/selftest.pl
index 2680b6adce..33af5e29b7 100755
--- a/selftest/selftest.pl
+++ b/selftest/selftest.pl
@@ -166,6 +166,14 @@ my $prefix = "./st";
my @includes = ();
my @excludes = ();
+sub pipe_handler {
+ my $sig = shift @_;
+ print STDERR "Exiting early because of SIGPIPE.\n";
+ exit(1);
+}
+
+$SIG{PIPE} = \&pipe_handler;
+
sub find_in_list($$)
{
my ($list, $fullname) = @_;