Fix bugs found with recent addition of assertions in
[oota-llvm.git] / utils / NightlyTest.pl
index daac2a488be9837c6b879a47eadc45ee98806771..d02e660ad1923ec5714cb6439d6706605aaaf13d 100755 (executable)
@@ -1,4 +1,4 @@
-#!/usr/dcs/software/supported/bin/perl -w
+#!/usr/bin/perl -w
 #
 # Program:  NightlyTest.pl
 #
@@ -281,8 +281,8 @@ foreach $File (@CVSHistory) {
   my ($Type, $Date, $UID, $Rev, $Filename);
   if ($File =~ /([AMRUGC]) ($DateRE) ([^ ]+) +([^ ]+) +([^ ]+) +([^ ]+)/) {
     ($Type, $Date, $UID, $Rev, $Filename) = ($1, $2, $3, $4, "$6/$5");
-  } elsif ($File =~ /([W]) ($DateRE) ([^ ]+) +([^ ]+) +([^ ]+)/) {
-    ($Type, $Date, $UID, $Rev, $Filename) = ($1, $2, $3, $4, "$6/$5");
+  } elsif ($File =~ /([W]) ($DateRE) ([^ ]+)/) {
+    ($Type, $Date, $UID, $Rev, $Filename) = ($1, $2, $3, "", "");
   } elsif ($File =~ /([O]) ($DateRE) ([^ ]+) +([^ ]+)/) {
     ($Type, $Date, $UID, $Rev, $Filename) = ($1, $2, $3, "", "$4/");
   } else {