Added a check to skip dejagnu test results gathering if we did not run dejagnu tests

llvm-svn: 29252
This commit is contained in:
Patrick Jenkins 2006-07-21 21:58:06 +00:00
parent 7ef934f6ab
commit 3b606ccc94
1 changed files with 13 additions and 11 deletions

View File

@ -832,22 +832,24 @@ if (!$BuildError && $patrickjenkins) {
#
#
##############################################################
$dejagnu = ReadFile $DejagnuSum;
@DEJAGNU = split "\n", $dejagnu;
my $dejagnu = ReadFile $DejagnuSum;
my @DEJAGNU = split "\n", $dejagnu;
my $passes="",
my $fails="";
my $xfails="";
for($x=0; $x<@DEJAGNU; $x++){
if($DEJAGNU[$x] =~ m/^PASS:/){
$passes.="$DEJAGNU[$x]\n";
}
elsif($DEJAGNU[$x] =~ m/^FAIL:/){
$fails.="$DEJAGNU[$x]\n";
}
elsif($DEJAGNU[$x] =~ m/^XFAIL:/){
$xfails.="$DEJAGNU[$x]\n";
if(!$NODEJAGNU) {
for($x=0; $x<@DEJAGNU; $x++){
if($DEJAGNU[$x] =~ m/^PASS:/){
$passes.="$DEJAGNU[$x]\n";
}
elsif($DEJAGNU[$x] =~ m/^FAIL:/){
$fails.="$DEJAGNU[$x]\n";
}
elsif($DEJAGNU[$x] =~ m/^XFAIL:/){
$xfails.="$DEJAGNU[$x]\n";
}
}
}