TEST.simple.report

   1 ##=== TEST.nightly.report - Report description for nightly -----*- perl -*-===##
   2 #
   3 # This file defines a report to be generated for the nightly tests.
   4 #
   5 ##===----------------------------------------------------------------------===##
   6
   7 # Sort by program name
   8 $SortCol = 0;
   9 $TrimRepeatedPrefix = 1;
  10
  11 my $WallTimeRE = "Time: ([0-9.]+) seconds \\([0-9.]+ wall clock";
  12
  13 # FormatTime - Convert a time from 1m23.45 into 83.45
  14 sub FormatTime {
  15   my $Time = shift;
  16   if ($Time =~ m/([0-9]+)[m:]([0-9.]+)/) {
  17     return sprintf("%7.4f", $1*60.0+$2);
  18   }
  19
  20   return sprintf("%7.4f", $Time);
  21 }
  22
  23 (
  24  ["Program"  , '\'([^\']+)\' Program'],
  25  [],
  26  ["CC"       , 'TEST-RESULT-compile-success: (pass|fail|xfail)'],
  27  ["CC_Time"  , 'TEST-RESULT-compile-time: program\s*([.0-9m:]+)', \&FormatTime],
  28  ["Exec"     , 'TEST-RESULT-exec-success: (pass|fail|xfail)'],
  29  ["Exec_Time", 'TEST-RESULT-exec-time: program\s*([.0-9m:]+)', \&FormatTime],
  30 );