diff options
author | Paul Smith <psmith@gnu.org> | 2006-03-10 02:20:45 +0000 |
---|---|---|
committer | Paul Smith <psmith@gnu.org> | 2006-03-10 02:20:45 +0000 |
commit | 6d8d9b74d9c50cb07fe952ac0929f618e4280a55 (patch) | |
tree | 2ba40ec88c9a4f3445fbc8f6dc6a3de7760ac604 /tests/test_driver.pl | |
parent | afc4906acaeb7191e4ec085d7be4ca5b036b821d (diff) | |
download | gunmake-6d8d9b74d9c50cb07fe952ac0929f618e4280a55.tar.gz |
Numerous updates to tests for issues found on Cygwin and Windows.
Revert a fix for $? including non-existent files as it shows a bug
in the Linux kernel build. Give them a release to fix this.
Add some changes from Eli Z. for Windows changes.
Diffstat (limited to 'tests/test_driver.pl')
-rw-r--r-- | tests/test_driver.pl | 12 |
1 files changed, 4 insertions, 8 deletions
diff --git a/tests/test_driver.pl b/tests/test_driver.pl index e61da12..c5ee157 100644 --- a/tests/test_driver.pl +++ b/tests/test_driver.pl @@ -427,8 +427,7 @@ sub run_each_test $diffext = 'd'; $baseext = 'b'; $extext = ''; - } - else { + } else { $logext = 'log'; $diffext = 'diff'; $baseext = 'base'; @@ -459,12 +458,9 @@ sub run_each_test if (!defined($code)) { $suite_passed = 0; - if (length ($@)) - { + if (length ($@)) { warn "\n*** Test died ($testname): $@\n"; - } - else - { + } else { warn "\n*** Couldn't run $perl_testname\n"; } } @@ -490,7 +486,7 @@ sub run_each_test &rmfiles ($base_filename . &num_suffix ($i) ); } } - elsif ($code > 0) { + elsif (!defined $code || $code > 0) { $status = "FAILED ($tests_passed/$tests_run passed)"; } elsif ($code < 0) { |