Testsuite: recenter 2 performance tests on Windows
authorThomas Miedema <thomasmiedema@gmail.com>
Fri, 14 Aug 2015 10:05:20 +0000 (12:05 +0200)
committerThomas Miedema <thomasmiedema@gmail.com>
Sat, 15 Aug 2015 15:28:05 +0000 (17:28 +0200)
No major deviations. Also fixup T7861.

testsuite/tests/perf/should_run/all.T
testsuite/tests/typecheck/should_run/T7861.stderr

index 0fa09f4..262f4e1 100644 (file)
@@ -53,11 +53,12 @@ test('lazy-bs-alloc',
      [stats_num_field('peak_megabytes_allocated', (2, 1)),
                                  # expected value: 2 (amd64/Linux)
       stats_num_field('bytes allocated',
-          [(wordsize(64), 425400, 3),
+          [(wordsize(64), 431500, 3),
             #             489776 (amd64/Linux)
             # 2013-02-07: 429744 (amd64/Linux)
             # 2013-12-12: 425400 (amd64/Linux)
             # 2015-04-04: Widen 1->3% (amd64/Windows was failing)
+            # 2015-08-15: 431500 (Windows not good enough. avg of Windows&Linux)
            (wordsize(32), 411500, 2)]),
             # 2013-02-10: 421296 (x86/Windows)
             # 2013-02-10: 414180 (x86/OSX)
@@ -183,10 +184,11 @@ test('T5205',
      [stats_num_field('bytes allocated',
                       [(wordsize(32), 47088, 5),
                     # expected value: 47088 (x86/Darwin)
-                       (wordsize(64), 52600, 7)]),
+                       (wordsize(64), 50648, 7)]),
                     # expected value: 51320 (amd64/Linux)
                     # 2014-07-17:     52600 (amd64/Linux) general round of updates
                     # 2015-04-03: Widen 5->7% (amd64/Windows was doing better)
+                    # 2015-08-15: 50648 (Windows too good. avg of Windows&Linux)
       only_ways(['normal', 'optasm'])
       ],
      compile_and_run,
index 62b0dcd..8ed4be2 100644 (file)
@@ -1,7 +1,9 @@
 T7861: T7861.hs:10:5: error:
     Couldn't match type ‘a’ with ‘[a]’
     ‘a’ is a rigid type variable bound by
-        the type signature for: f :: (forall b. a) -> a at T7861.hs:9:6
+        the type signature for:
+          f :: (forall b. a) -> a
+        at T7861.hs:9:6
     Expected type: (forall b. a) -> a
       Actual type: (forall b. a) -> [a]
     Relevant bindings include