[llvm-commits] CVS: poolalloc/test/TEST.p4perf.report

[Chris Lattner]

Changes in directory poolalloc/test:

TEST.p4perf.report updated: 1.1 -> 1.2

---
Log message:

Add ratio and AllPA support


---
Diffs of the changes:  (+15 -4)

Index: poolalloc/test/TEST.p4perf.report
diff -u poolalloc/test/TEST.p4perf.report:1.1 poolalloc/test/TEST.p4perf.report:1.2
--- poolalloc/test/TEST.p4perf.report:1.1	Fri Mar  5 17:39:43 2004
+++ poolalloc/test/TEST.p4perf.report	Fri Mar  5 18:01:52 2004
@@ -69,6 +69,15 @@
                      "$PTRDIST/yacr2/yacr2"           => 'yacr2',
                   );
 
+sub Ratio {
+  my ($Cols, $Col) = @_;
+  if ($Cols->[$Col-2] ne "*" and $Cols->[$Col-1] ne "*" and
+      $Cols->[$Col-2] != "0") {
+    return sprintf "%1.3f", $Cols->[$Col-1]/$Cols->[$Col-2];
+  } else {
+    return "n/a";
+  }
+}
 
 # These are the columns for the report.  The first entry is the header for the
 # column, the second is the regex to use to match the value.  Empty list create
@@ -78,11 +87,13 @@
  ["Name:" , '\'([^\']+)\' Program'],
  [],
 # Times
- ["L1Misses",   'CBE-L1-Cache-Misses: ([0-9]+)'],
- ["L2Misses",   'CBE-L2-Cache-Misses: ([.0-9]+)'],
+ ["L1Miss",   'CBE-L1-Cache-Misses: ([0-9]+)'],
+ ["PAL1Miss",   'CBE-PA-L1-Cache-Misses: ([0-9]+)'],
+ ["PAL1Ratio", \&Ratio],
 
- ["PoolAllocL1Misses",   'CBE-PA-L1-Cache-Misses: ([0-9]+)'],
- ["PoolAllocL2Misses",   'CBE-PA-L2-Cache-Misses: ([.0-9]+)'],
+ ["L2Miss",   'CBE-L2-Cache-Misses: ([.0-9]+)'],
+ ["PAL2Miss",   'CBE-PA-L2-Cache-Misses: ([.0-9]+)'],
+ ["PAL2Ratio", \&Ratio],
  []
 );