[llvm-commits] CVS: llvm/test/Programs/GenerateReport.pl

[Alkis Evlogimenos]

Changes in directory llvm/test/Programs:

GenerateReport.pl updated: 1.18 -> 1.19

---
Log message:

Add column adding helper function


---
Diffs of the changes:  (+13 -0)

Index: llvm/test/Programs/GenerateReport.pl
diff -u llvm/test/Programs/GenerateReport.pl:1.18 llvm/test/Programs/GenerateReport.pl:1.19
--- llvm/test/Programs/GenerateReport.pl:1.18	Tue Jan  6 19:48:26 2004
+++ llvm/test/Programs/GenerateReport.pl	Mon Mar 29 10:57:42 2004
@@ -57,6 +57,19 @@
   return $Val;
 }
 
+sub AddColumns {
+  my ($Cols, $Col, @Indices) = @_;
+  my $result = 0;
+
+  foreach $Idx (@Indices) {
+    if ($Cols->[$Col+$Idx] ne "*") {
+      $result += $Cols->[$Col+$Idx];
+    }
+  }
+
+  return $result;
+}
+
 # Check command line arguments...
 die "Must specify a report description option" if (scalar(@ARGV) < 1);