diff options
author | Reid Spencer <rspencer@reidspencer.com> | 2004-05-30 00:17:47 +0000 |
---|---|---|
committer | Reid Spencer <rspencer@reidspencer.com> | 2004-05-30 00:17:47 +0000 |
commit | 542e85921689e9ad8283f3d775b1db52df99e583 (patch) | |
tree | 453d2e6b7fc17da32eeb52a1194dd7adb7d779b7 | |
parent | 3c82aa3623fc047a90502058988f83cdf1f10edb (diff) |
Make the Regression/Feature test support excise all ": PASS" lines that
indicate successful tests. We're really only interested in the bad news
in this output :)
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@13901 91177308-0d34-0410-b5e6-96231b3b80d8
-rwxr-xr-x | utils/NightlyTest.pl | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/utils/NightlyTest.pl b/utils/NightlyTest.pl index 26a380efb6..cf1d1b9c7a 100755 --- a/utils/NightlyTest.pl +++ b/utils/NightlyTest.pl @@ -180,7 +180,7 @@ if ($VERBOSE) { if (!$NOCHECKOUT) { if (-d $BuildDir) { if (!$NOREMOVE) { - rmdir $BuildDir or die "Could not remove CVS checkout directory $BuildDir!"; + system "rm -rf $BuildDir"; } else { die "CVS checkout directory $BuildDir already exists!"; } @@ -270,14 +270,19 @@ sub GetQMTestResults { # (filename) my $firstline; $/ = "\n"; #Make sure we're going line at a time. if (open SRCHFILE, $filename) { + # Skip stuff before ---TEST RESULTS while ( <SRCHFILE> ) { if ( m/^--- TEST RESULTS/ ) { push(@lines, $_); last; } } + # Process test results while ( <SRCHFILE> ) { if ( length($_) > 1 ) { - if ( ! m/^gmake:/ && ! m/^ qmtest.target:/ && !/^ local/ ) { + if ( ! m/: PASS[ ]*$/ && + ! m/^ qmtest.target:/ && + ! m/^ local/ && + ! m/^gmake:/ ) { push(@lines,$_); } } |