| ##=== TEST.fourway.report - Report description for llc tests ---*- perl -*-===## |
| # |
| # This file defines a report to be generated for the fourway-time test. |
| # |
| ##===----------------------------------------------------------------------===## |
| |
| # Sort by name |
| $SortCol = 1; |
| $TrimRepeatedPrefix = 1; |
| |
| sub Percentage { |
| my ($Cols, $Col) = @_; |
| my $GCC = $Cols->[$Col-5]; |
| my $LLVMGCC = $Cols->[$Col-4]; |
| return "n/a" if ($GCC eq "*" or $LLVMGCC eq "*"); |
| return sprintf("%5.1f%%", $LLVMGCC / $GCC * 100) |
| if ($GCC >= 0.01 and $LLVMGCC >= 0.01); |
| return " -"; |
| } |
| |
| # 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 |
| # seperators, and closures may be put in for custom processing. |
| ( |
| # Name |
| ["Name:" , '\'([^\']+)\' Program'], |
| [], |
| # Times |
| ["Time GND", 'real ([0-9.]+)gcc\.nodebug'], |
| ["Time GD", 'real ([0-9.]+)gcc\.debug'], |
| ["Time LND", 'real ([0-9.]+)llvmgcc\.nodebug'], |
| ["Time LD", 'real ([0-9.]+)llvmgcc\.debug'], |
| [], |
| # Time Ratios |
| ["No Debug", \&Percentage], |
| ["Debug", \&Percentage], |
| [], |
| ); |