[commit: ghc] master: New testsuite verbosity level 4 (cfeeded)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/cfeededff5662a6e2dc0104eb00adcca4d4ae984/ghc

>---------------------------------------------------------------

commit cfeededff5662a6e2dc0104eb00adcca4d4ae984
Author: Joachim Breitner <mail at joachim-breitner.de>
Date:   Mon Jul 14 13:29:47 2014 +0200

    New testsuite verbosity level 4
    
    which makes it print performance numbers even when the test succeeds
    (good for historic analysis)


>---------------------------------------------------------------

cfeededff5662a6e2dc0104eb00adcca4d4ae984
 testsuite/driver/runtests.py | 4 ++--
 testsuite/driver/testlib.py  | 2 +-
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/testsuite/driver/runtests.py b/testsuite/driver/runtests.py
index c92eaef..103c7ac 100644
--- a/testsuite/driver/runtests.py
+++ b/testsuite/driver/runtests.py
@@ -98,8 +98,8 @@ for opt,arg in opts:
         config.skip_perf_tests = True
 
     if opt == '--verbose':
-        if arg not in ["0","1","2","3"]:
-            sys.stderr.write("ERROR: requested verbosity %s not supported, use 0,1,2 or 3" % arg)
+        if arg not in ["0","1","2","3","4"]:
+            sys.stderr.write("ERROR: requested verbosity %s not supported, use 0,1,2,3 or 4" % arg)
             sys.exit(1)
         config.verbose = int(arg)
 
diff --git a/testsuite/driver/testlib.py b/testsuite/driver/testlib.py
index 3479b6a..e44f5f5 100644
--- a/testsuite/driver/testlib.py
+++ b/testsuite/driver/testlib.py
@@ -1052,7 +1052,7 @@ def checkStats(stats_file, range_fields):
                 print field, 'value is too high:'
                 result = failBecause('stat not good enough')
 
-            if val < lowerBound or val > upperBound:
+            if val < lowerBound or val > upperBound or config.verbose >= 4:
                 valStr = str(val)
                 valLen = len(valStr)
                 expectedStr = str(expected)