diff options
| author | Simon Marlow <simonmar@microsoft.com> | 2006-10-16 15:08:02 +0000 |
|---|---|---|
| committer | Simon Marlow <simonmar@microsoft.com> | 2006-10-16 15:08:02 +0000 |
| commit | 80b1239ee0f6938195d25081601fb2852dcda1e9 (patch) | |
| tree | 5868347608508450c41dae1eac2c3f168510a4c9 | |
| parent | 45b6b2e62b49c953ad5da57ce11df59e755104a3 (diff) | |
| download | haskell-80b1239ee0f6938195d25081601fb2852dcda1e9.tar.gz | |
fix a regular expression in banner_re
| -rw-r--r-- | utils/nofib-analyse/Slurp.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/utils/nofib-analyse/Slurp.hs b/utils/nofib-analyse/Slurp.hs index 7e6d46f870..8305f3e87b 100644 --- a/utils/nofib-analyse/Slurp.hs +++ b/utils/nofib-analyse/Slurp.hs @@ -4,7 +4,7 @@ -- ----------------------------------------------------------------------------- -module Slurp (Status(..), Results(..), ResultTable(..), parse_log) where +module Slurp (Status(..), Results(..), ResultTable, parse_log) where import CmdLine import Data.FiniteMap @@ -75,7 +75,8 @@ Various banner lines: ==nofib== boyer2: time to compile Checker follows... -} -banner_re = mkRegex "^==nofib==[ \t]+([A-Za-z0-9\\-_]+):[ \t]+(size of|time to link|time to run|time to compile)[ \t]+([A-Za-z0-9\\-_]+)(\\.o)?[ \t]+follows" +-- NB. the hyphen must come last (or first) inside [...] to stand for itself. +banner_re = mkRegex "^==nofib==[ \t]+([A-Za-z0-9_-]+):[ \t]+(size of|time to link|time to run|time to compile)[ \t]+([A-Za-z0-9_-]+)(\\.o)?[ \t]+follows" {- This regexp for the output of "time" works on FreeBSD, other versions |