[commit: ghc] master: Update 32-bit perf numbers (7201e2a)

git at git.haskell.org git at git.haskell.org
Mon Apr 28 10:00:23 UTC 2014


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

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

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

commit 7201e2add2834f16549869417e9fface94f83a90
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date:   Fri Apr 25 00:07:20 2014 +0100

    Update 32-bit perf numbers
    
    Many of these have never been initialised, I think.  They
    were simply guesses from the 64-bit version.


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

7201e2add2834f16549869417e9fface94f83a90
 libraries/base/tests/all.T            |    6 ++++--
 testsuite/tests/perf/compiler/all.T   |    8 +++++---
 testsuite/tests/perf/haddock/all.T    |    3 ++-
 testsuite/tests/perf/should_run/all.T |   13 +++++++++----
 4 files changed, 20 insertions(+), 10 deletions(-)

diff --git a/libraries/base/tests/all.T b/libraries/base/tests/all.T
index d4a6c05..21e3d0c 100644
--- a/libraries/base/tests/all.T
+++ b/libraries/base/tests/all.T
@@ -156,10 +156,12 @@ test('topHandler03',
 
 
 test('T8766',
-        [ stats_num_field('bytes allocated', (16828144, 5)),
+        [ stats_num_field('bytes allocated', 
+                          [ (wordsize(64), 16828144, 5)
 	# with GHC-7.6.3: 83937384 (but faster execution than the next line)
 	# before:         58771216 (without call-arity-analysis)
 	# expected value: 16828144 (2014-01-14)
-	only_ways(['normal'])],
+                          , (wordsize(32), 8433644, 5) ]) 
+        , only_ways(['normal'])],
       compile_and_run,
       ['-O'])
diff --git a/testsuite/tests/perf/compiler/all.T b/testsuite/tests/perf/compiler/all.T
index 2bff1c7..bd9a08f 100644
--- a/testsuite/tests/perf/compiler/all.T
+++ b/testsuite/tests/perf/compiler/all.T
@@ -42,11 +42,12 @@ test('T1969',
              # 2013-02-13 27, very unstable!
              # 2013-09-11 30 (amd64/Linux)
       compiler_stats_num_field('max_bytes_used',
-          [(platform('i386-unknown-mingw32'), 7295012, 20),
+          [(platform('i386-unknown-mingw32'), 5719436, 20),
                                  # 2010-05-17 5717704 (x86/Windows)
                                  # 2013-02-10 5159748 (x86/Windows)
                                  # 2013-02-10 5030080 (x86/Windows)
                                  # 2013-11-13 7295012 (x86/Windows, 64bit machine)
+                                 # 2014-04-24 5719436 (x86/Windows, 64bit machine)
            (wordsize(32), 6429864, 1),
              #            6707308 (x86/OS X)
              # 2009-12-31 6149572 (x86/Linux)
@@ -110,12 +111,13 @@ else:
 test('T3294',
      [
       compiler_stats_num_field('max_bytes_used', # Note [residency]
-          [(wordsize(32), 24009436, 15),
+          [(wordsize(32), 19882188, 15),
              #            17725476 (x86/OS X)
              #            14593500 (Windows)
              # 2013-02-10 20651576 (x86/Windows)
              # 2013-02-10 20772984 (x86/OSX)
              # 2013-11-13 24009436 (x86/Windows, 64bit machine)
+             # 2014-04-24 19882188 (x86/Windows, 64bit machine)
            (wordsize(64), 43224080, 15)]),
              # prev:           25753192 (amd64/Linux)
              # 29/08/2012:     37724352 (amd64/Linux)
@@ -411,7 +413,7 @@ test('T6048',
 test('T9020',
      [ only_ways(['optasm']),
       compiler_stats_num_field('bytes allocated',
-          [(wordsize(32),  40000000, 10),
+          [(wordsize(32), 381360728, 10),
            (wordsize(64), 795469104, 10)])
       ],
       compile,[''])
diff --git a/testsuite/tests/perf/haddock/all.T b/testsuite/tests/perf/haddock/all.T
index e1d7e9f..6a2ed82 100644
--- a/testsuite/tests/perf/haddock/all.T
+++ b/testsuite/tests/perf/haddock/all.T
@@ -101,10 +101,11 @@ test('haddock.Cabal',
             # 2013-11-21: 3908586784 (amd64/Linux) Cabal updated
             # 2013-12-12: 3828567272 (amd64/Linux)
             # 2014-01-12: 3979151552 (amd64/Linux) new parser
-          ,(platform('i386-unknown-mingw32'), 1966911336, 1)
+          ,(platform('i386-unknown-mingw32'), 2052220292, 5)
             # 2012-10-30:                     1733638168 (x86/Windows)
             # 2013-02-10:                     1906532680 (x86/Windows)
             # 2014-01-28:                     1966911336 (x86/Windows)
+            # 2014-04-24:                     2052220292 (x86/Windows)
           ,(wordsize(32), 1986290624, 1)])
             # 2012-08-14: 1648610180 (x86/OSX)
             # 2014-01-22: 1986290624 (x86/Linux)
diff --git a/testsuite/tests/perf/should_run/all.T b/testsuite/tests/perf/should_run/all.T
index 606448b..8030251 100644
--- a/testsuite/tests/perf/should_run/all.T
+++ b/testsuite/tests/perf/should_run/all.T
@@ -311,7 +311,7 @@ test('T7850',
 
 test('T5949',
      [stats_num_field('bytes allocated',
-                      [ (wordsize(32), 101000, 10),
+                      [ (wordsize(32), 116020, 10),
                         (wordsize(64), 201008, 10)]),
                       # previously, it was >400000 bytes
       only_ways(['normal'])],
@@ -320,7 +320,8 @@ test('T5949',
 
 test('T4267',
      [stats_num_field('bytes allocated',
-                      [ (wordsize(32), 20992, 10)
+                      [ (wordsize(32), 36012, 10)
+                      # 32-bit value close to 64 bit; c.f. T7619
                       , (wordsize(64), 40992, 10) ]),
                       # previously, it was >170000 bytes
                       # 2014-01-17: 130000
@@ -331,7 +332,9 @@ test('T4267',
 
 test('T7619',
      [stats_num_field('bytes allocated',
-                      [ (wordsize(32), 20992, 10)
+                      [ (wordsize(32), 36012, 10)
+                      # 32-bit close to 64-bit value; most of this very 
+                      # small number is standard start-up boilerplate I think
                       , (wordsize(64), 40992, 10) ]),
                       # previously, it was >400000 bytes
       only_ways(['normal'])],
@@ -348,8 +351,10 @@ test('InlineArrayAlloc',
 
 test('InlineByteArrayAlloc',
      [stats_num_field('bytes allocated',
-                      [ (wordsize(32),  720040960, 5)
+                      [ (wordsize(32), 1360036012, 5)
                       , (wordsize(64), 1440040960, 5) ]),
+         # 32 and 64 bit not so different, because 
+         # we are allocating *byte* arrays
       only_ways(['normal'])],
      compile_and_run,
      ['-O2'])



More information about the ghc-commits mailing list