]> git.saurik.com Git - apple/ld64.git/blobdiff - ld64-134.9/unit-tests/bin/fail-if-exit-zero.pl
ld64-136.tar.gz
[apple/ld64.git] / ld64-134.9 / unit-tests / bin / fail-if-exit-zero.pl
diff --git a/ld64-134.9/unit-tests/bin/fail-if-exit-zero.pl b/ld64-134.9/unit-tests/bin/fail-if-exit-zero.pl
deleted file mode 100755 (executable)
index 7859888..0000000
+++ /dev/null
@@ -1,22 +0,0 @@
-#!/usr/bin/perl -w
-
-use strict;
-
-my $test_name = "";
-if ( exists $ENV{UNIT_TEST_NAME} ) {
-    $test_name = $ENV{UNIT_TEST_NAME};
-}
-
-my $ret = system(@ARGV);
-my $exit_value  = $ret >> 8;
-my $signal_num  = $ret & 127;
-my $dumped_core = $ret & 128;
-my $crashed  = $signal_num + $dumped_core;
-
-if(0 == $exit_value || 0 != $crashed)
-{
-    printf("FAIL $test_name\n");
-    exit 1;
-}
-
-exit 0;