summaryrefslogtreecommitdiff
path: root/tests/test_driver.pl
diff options
context:
space:
mode:
authorPaul Smith <psmith@gnu.org>2006-03-10 02:20:45 +0000
committerPaul Smith <psmith@gnu.org>2006-03-10 02:20:45 +0000
commit6d8d9b74d9c50cb07fe952ac0929f618e4280a55 (patch)
tree2ba40ec88c9a4f3445fbc8f6dc6a3de7760ac604 /tests/test_driver.pl
parentafc4906acaeb7191e4ec085d7be4ca5b036b821d (diff)
downloadgunmake-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.pl12
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) {