summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorTamar Christina <tamar@zhox.com>2017-02-21 11:21:48 -0500
committerBen Gamari <ben@smart-cactus.org>2017-02-21 19:41:55 -0500
commit9ef2749c3f3818944ae7dac5c9d10851b63b834a (patch)
treea75dcfa3af6c31c055e3f1af3521e122529c8a6f
parent499a15db0d71a9d0b91cbd5f509dabff50df2566 (diff)
downloadhaskell-9ef2749c3f3818944ae7dac5c9d10851b63b834a.tar.gz
Fix all broken perf tests on x64 Windows
various perf tests have been broken over the course of the past few months. This updates the numbers. Test Plan: ./validate Reviewers: austin, bgamari Subscribers: thomie, #ghc_windows_task_force Differential Revision: https://phabricator.haskell.org/D3160
-rw-r--r--testsuite/tests/deriving/perf/all.T5
-rw-r--r--testsuite/tests/perf/compiler/all.T13
-rw-r--r--testsuite/tests/perf/haddock/all.T5
-rw-r--r--testsuite/tests/perf/join_points/all.T7
-rw-r--r--testsuite/tests/perf/should_run/all.T5
5 files changed, 29 insertions, 6 deletions
diff --git a/testsuite/tests/deriving/perf/all.T b/testsuite/tests/deriving/perf/all.T
index 8dee98961b..a13a6aa7b9 100644
--- a/testsuite/tests/deriving/perf/all.T
+++ b/testsuite/tests/deriving/perf/all.T
@@ -1,6 +1,9 @@
test('T10858',
[compiler_stats_num_field('bytes allocated',
- [ (wordsize(64), 304094944, 8) ]),
+ [(platform('x86_64-unknown-mingw32'), 272402736, 8),
+ # 2017-02-19 272402736 (x64/Windows) - unknown
+
+ (wordsize(64), 304094944, 8) ]),
# Initial: 476296112
# 2016-12-19 247768192 Join points (#19288)
# 2016-02-12 304094944 Type-indexed Typeable
diff --git a/testsuite/tests/perf/compiler/all.T b/testsuite/tests/perf/compiler/all.T
index c9b50919f5..e5fefaad22 100644
--- a/testsuite/tests/perf/compiler/all.T
+++ b/testsuite/tests/perf/compiler/all.T
@@ -612,6 +612,9 @@ test('T5837',
# 2014-12-08: 115905208 Constraint solver perf improvements (esp kick-out)
# 2016-04-06: 24199320 (x86/Linux, 64-bit machine) TypeInType
+ (platform('x86_64-unknown-mingw32'), 59161648, 7),
+ # 2017-02-19 59161648 (x64/Windows) - Unknown
+
(wordsize(64), 58648600, 7)])
# sample: 3926235424 (amd64/Linux, 15/2/2012)
# 2012-10-02 81879216
@@ -901,7 +904,10 @@ test('T10370',
test('T10547',
[ compiler_stats_num_field('bytes allocated',
- [(wordsize(64), 37681360, 20),
+ [(platform('x86_64-unknown-mingw32'), 37485128, 20),
+ # 2017-02-19 37485128 (x64/Windows) - Unknown
+
+ (wordsize(64), 37681360, 20),
# initial: 39165544
# 2016-11-25: 31041520 Linux Around the time of refactoring the constraint solver;
# but I think that only pushed it over the edge
@@ -940,8 +946,9 @@ test('T12425',
test('T12234',
[ only_ways(['optasm']),
compiler_stats_num_field('bytes allocated',
- [(platform('x86_64-unknown-mingw32'), 77949232, 5),
- # initial: 77949232
+ [(platform('x86_64-unknown-mingw32'), 89180624, 5),
+ # initial: 89180624
+ # 2017-02-19 89180624 (x64/Windows) - Unknown
(wordsize(64), 86525344, 5),
# initial: 72958288
# 2016-01-17: 76848856 (x86-64, Linux. drift?)
diff --git a/testsuite/tests/perf/haddock/all.T b/testsuite/tests/perf/haddock/all.T
index a148b712d2..9bd29ff8a8 100644
--- a/testsuite/tests/perf/haddock/all.T
+++ b/testsuite/tests/perf/haddock/all.T
@@ -5,7 +5,10 @@
test('haddock.base',
[unless(in_tree_compiler(), skip), req_haddock
,stats_num_field('bytes allocated',
- [(wordsize(64), 25592972912, 5)
+ [(platform('x86_64-unknown-mingw32'), 24286343184, 5)
+ # 2017-02-19 24286343184 (x64/Windows) - Generalize kind of (->)
+
+ ,(wordsize(64), 25592972912, 5)
# 2012-08-14: 5920822352 (amd64/Linux)
# 2012-09-20: 5829972376 (amd64/Linux)
# 2012-10-08: 5902601224 (amd64/Linux)
diff --git a/testsuite/tests/perf/join_points/all.T b/testsuite/tests/perf/join_points/all.T
index 0747daeade..fe202b6487 100644
--- a/testsuite/tests/perf/join_points/all.T
+++ b/testsuite/tests/perf/join_points/all.T
@@ -25,6 +25,11 @@ test('join005', normal, compile, [''])
test('join006', normal, compile, [''])
test('join007',
- [stats_num_field('bytes allocated', [(wordsize(64), 50944, 5)])],
+ [stats_num_field('bytes allocated',
+ [(platform('x86_64-unknown-mingw32'), 47368, 5),
+ # 2017-02-19 47368 (x64/Windows) - Unknown
+
+ (wordsize(64), 50944, 5)])],
+ # Initial 50944
compile_and_run,
[''])
diff --git a/testsuite/tests/perf/should_run/all.T b/testsuite/tests/perf/should_run/all.T
index 27d8df87b8..6670f341a6 100644
--- a/testsuite/tests/perf/should_run/all.T
+++ b/testsuite/tests/perf/should_run/all.T
@@ -450,6 +450,11 @@ test('T9203',
test('T9339',
[stats_num_field('bytes allocated',
[ (wordsize(32), 40046844, 5)
+ # is this number correct? Seems very high.
+
+ , (platform('x86_64-unknown-mingw32'), 47088, 7)
+ # 2017-02-19 47088 (x64/Windows) - Unknown
+
, (wordsize(64), 50728, 5) ]),
# w/o fusing last: 320005080
# 2014-07-22: 80050760