From ad6f758f8964bb091b5e443220ae3138d781b983 Mon Sep 17 00:00:00 2001 From: Patrick Jenkins Date: Tue, 22 Aug 2006 18:11:19 +0000 Subject: [PATCH] Corrected an error that was introduced yesterday that caused the GCC version to be left blank if the build failed. Also corrected a problem where if the build failed the nightly tester would still try to read the results of the Dejagnutests log even though it didnt exist. git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@29829 91177308-0d34-0410-b5e6-96231b3b80d8 --- utils/NewNightlyTest.pl | 70 ++++++++++++++++++++--------------------- 1 file changed, 34 insertions(+), 36 deletions(-) diff --git a/utils/NewNightlyTest.pl b/utils/NewNightlyTest.pl index db78195a9c8..d59f1bc5d72 100755 --- a/utils/NewNightlyTest.pl +++ b/utils/NewNightlyTest.pl @@ -768,8 +768,7 @@ if (!$NODEJAGNU) { # ############################################################## sub TestDirectory { - my $SubDir = shift; - + my $SubDir = shift; ChangeDir( "$BuildDir/llvm/projects/llvm-test/$SubDir", "Programs Test Subdirectory" ) || return ("", ""); @@ -850,35 +849,34 @@ if (!$BuildError) { "$Prefix-MultiSource-Performance.txt ". " | sort > $Prefix-Performance.txt"; } -} -############################################################## -# -# -# gathering tests added removed broken information here -# -# -############################################################## -my $dejagnu_test_list = ReadFile "$Prefix-Tests.txt"; -my @DEJAGNU = split "\n", $dejagnu_test_list; + ############################################################## + # + # + # gathering tests added removed broken information here + # + # + ############################################################## + my $dejagnu_test_list = ReadFile "$Prefix-Tests.txt"; + my @DEJAGNU = split "\n", $dejagnu_test_list; + my ($passes, $fails, $xfails) = ""; -my $passes="", -my $fails=""; -my $xfails=""; - -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"; + 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"; + } } } -} + +} #end if !$BuildError + ############################################################## # @@ -947,6 +945,15 @@ my (@DEJAGNU_LOG, @DEJAGNU_SUM, @DEJAGNULOG_FULL, @GCC_VERSION); my ($dejagnutests_log ,$dejagnutests_sum, $dejagnulog_full) = ""; my ($gcc_version, $gcc_version_long) = ""; +$gcc_version_long=""; +if ($GCCPATH ne "") { + $gcc_version_long = `$GCCPATH/gcc --version`; +} else { + $gcc_version_long = `gcc --version`; +} +@GCC_VERSION = split '\n', $gcc_version_long; +$gcc_version = $GCC_VERSION[0]; + if(!$BuildError){ @DEJAGNU_LOG = ReadFile "$DejagnuLog"; @DEJAGNU_SUM = ReadFile "$DejagnuSum"; @@ -955,15 +962,6 @@ if(!$BuildError){ @DEJAGNULOG_FULL = ReadFile "$DejagnuTestsLog"; $dejagnulog_full = join("\n", @DEJAGNULOG_FULL); - - $gcc_version_long=""; - if ($GCCPATH ne "") { - $gcc_version_long = `$GCCPATH/gcc --version`; - } else { - $gcc_version_long = `gcc --version`; - } - @GCC_VERSION = split '\n', $gcc_version_long; - $gcc_version = $GCC_VERSION[0]; } ##############################################################