diff --git a/llvm/utils/NightlyTest.pl b/llvm/utils/NightlyTest.pl index 9bbbf49b14176b2176c1be1313b8456700dfee8b..fe036bc3423485326eaea67b92ed50e6665a47ca 100755 --- a/llvm/utils/NightlyTest.pl +++ b/llvm/utils/NightlyTest.pl @@ -198,9 +198,11 @@ sub GetDejagnuTestResults { # (filename, log) my @lines; my $firstline; $/ = "\n"; #Make sure we're going line at a time. + + print "Dejagnu test results:\n"; + if (open SRCHFILE, $filename) { # Process test results - push(@lines,"

UNEXPECTED TEST RESULTS

  1. \n"); my $first_list = 1; my $should_break = 1; my $nocopy = 0; @@ -211,20 +213,30 @@ sub GetDejagnuTestResults { # (filename, log) if ( m/^XPASS:/ || m/^FAIL:/ ) { $nocopy = 0; if ( $first_list ) { + push(@lines,"

    UNEXPECTED TEST RESULTS

    1. \n"); $first_list = 0; $should_break = 1; push(@lines,"$_
      \n"); + print " $_\n"; } else { push(@lines,"
    2. $_
      \n"); + print " $_\n"; } } elsif ( m/Summary/ ) { - if ( $first_list ) { push(@lines,"PERFECT!"); } - push(@lines,"

    STATISTICS

    \n");
    +          if ( $first_list ) {
    +	    push(@lines,"PERFECT!"); 
    +	    print "  PERFECT!\n";
    +	  } else {
    +	    push(@lines, "
\n"); + } + push(@lines,"

STATISTICS

\n");
+	  print "\nSTATISTICS:\n";
           $should_break = 0;
           $nocopy = 0;
           $readingsum = 1;
         } elsif ( $readingsum ) {
           push(@lines,"$_\n");
+	  print "$_\n";
         }
       }
     }
@@ -446,7 +458,6 @@ if(!$NODEJAGNU) {
   CopyFile("test/testrun.sum", $DejagnuSum);
 
   $DejagnuTestResults = GetDejagnuTestResults($DejagnuSum, $DejagnuLog);
-  print $DejagnuTestResults;
 
 } else {
   $DejagnuTestResults = "Skipped by user choice.";