selftest: If a testsuite is killed by a signal, let selftest die.

diff --git a/selftest/selftest.pl b/selftest/selftest.pl
index 254c347b807a4c3fe03d18ecf2efaee9f904f7df..2680b6adcee6fc1577b9c870a5d77c3b98d4e8ac 100755 (executable)
--- a/selftest/selftest.pl
+++ b/selftest/selftest.pl
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 # Bootstrap Samba and run a number of tests against it.
-# Copyright (C) 2005-2009 Jelmer Vernooij <jelmer@samba.org>
+# Copyright (C) 2005-2010 Jelmer Vernooij <jelmer@samba.org>
 # Copyright (C) 2007-2009 Stefan Metzmacher <metze@samba.org>
 
 # This program is free software; you can redistribute it and/or modify
@@ -248,7 +248,7 @@ sub run_testsuite($$$$$)
        } elsif ($? & 127) {
                Subunit::end_testsuite($name, "error",
                        sprintf("%s died with signal %d, %s coredump\n", $cmd, ($? & 127),  ($? & 128) ? 'with' : 'without'));
-               return 0;
+               exit(1);
        }
 
        my $exitcode = $? >> 8;