diff options
Diffstat (limited to 'travis/run-tests.pl')
-rwxr-xr-x | travis/run-tests.pl | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/travis/run-tests.pl b/travis/run-tests.pl index 1b3af77..960af2e 100755 --- a/travis/run-tests.pl +++ b/travis/run-tests.pl @@ -44,14 +44,16 @@ sub TestCase { } my $testcases = 'testcases'; -my $testresults = 1; +my $testresults = 0; opendir(my $dir, $testcases) or die "Could not open directory $testcases: $!"; while (my $entry = readdir($dir)) { next unless (-d "$testcases/$entry"); next if ($entry =~ m/^\./); - $testresults = $testresults && TestCase("$testcases/$entry"); + if (not TestCase("$testcases/$entry") ) { + $testresults = 1; + } } closedir($dir); -exit 0; +exit $testresults; |