[llvm-commits] [llvm] r115412 - /llvm/trunk/utils/OldenDataRecover.pl

Chris Lattner sabre at nondot.org
Sat Oct 2 11:44:24 PDT 2010


Author: lattner
Date: Sat Oct  2 13:44:23 2010
New Revision: 115412

URL: http://llvm.org/viewvc/llvm-project?rev=115412&view=rev
Log:
nuke an old script

Removed:
    llvm/trunk/utils/OldenDataRecover.pl

Removed: llvm/trunk/utils/OldenDataRecover.pl
URL: http://llvm.org/viewvc/llvm-project/llvm/trunk/utils/OldenDataRecover.pl?rev=115411&view=auto
==============================================================================
--- llvm/trunk/utils/OldenDataRecover.pl (original)
+++ llvm/trunk/utils/OldenDataRecover.pl (removed)
@@ -1,37 +0,0 @@
-#this script is intended to help recover the running graphs when
-#the nightly tester decides to eat them.
-
-#zgrep -E "(=========)|(TEST-RESULT-llc-time)" *-Olden-tests.txt* |perl this > file
-#zgrep -E "(=========)|(TEST-RESULT-compile.*bc)" *-Olden-tests.tx* |perl this >file
-
-while (<>) {
-  if (/(\d*-\d*-\d*)-.*=========.*\/(.*)\' Program/) {
-#    print "$1 $2\n";
-    $curP = $2;
-    $curD = $1;
-    $dates{$1} = 1;
-  } elsif (/(\d*-\d*-\d*)-.*TEST-RESULT-.*: program (\d*\.\d*)/) {
-#    print "$1 $2\n";
-    if ($curD eq $1) {
-      $$data{$curD}{$curP} = $2;
-    }
-  } elsif (/(\d*-\d*-\d*)-.*TEST-RESULT-.*: (\d*)/) {
-#    print "$1 $2\n";
-    if ($curD eq $1) {
-      $$data{$curD}{$curP} = $2;
-    }
-  }
-}
- at progs = ("bh", "em3d", "mst", "power", "tsp", "bisort", "health", "perimeter", "treeadd", "voronoi");
-
-foreach $date (sort keys %dates) {
-  print "$date: ";
-  foreach $prog (@progs) {
-    if ($$data{$date}{$prog}) {
-      print " $$data{$date}{$prog}";
-    } else {
-      print " 0";
-    }
-  }
-  print "\n";
-}





More information about the llvm-commits mailing list