Fix space leak in BinIface.getSymbolTable
[ghc.git] / testsuite / tests / perf / compiler / all.T
1 # Tests that call 'compiler_stats_num_field' are skipped when debugging is on.
2 # See testsuite/driver/testlib.py.
3
4 def no_lint(name, opts):
5    opts.compiler_always_flags = \
6        [opt for opt in opts.compiler_always_flags if opt != '-dcore-lint' and opt != '-dcmm-lint']
7
8 setTestOpts(no_lint)
9
10
11 # Note [residency]
12 #
13 # Residency (peak_megabytes_allocated and max_bytes_used) is sensitive
14 # to when the major GC runs, which makes it inherently inaccurate.
15 # Sometime an innocuous change somewhere can shift things around such
16 # that the samples occur at a different time, and the residency
17 # appears to change (up or down) when the underlying profile hasn't
18 # really changed.
19 #
20 # However, please don't just ignore changes in residency.  If you see
21 # a change in one of these figures, please check whether it is real or
22 # not as follows:
23 #
24 #  * Run the test with old and new compilers, adding +RTS -h -i0.01
25 #    (you don't need to compile anything for profiling or enable profiling
26 #    libraries to get a heap profile).
27 #  * view the heap profiles, read off the maximum residency.  If it has
28 #    really changed, then you know there's an issue.
29
30 test('T1969',
31      [# expect_broken(12437),
32       compiler_stats_num_field('peak_megabytes_allocated', # Note [residency]
33           [(wordsize(32), 30, 15),
34              # 2010-05-17 14 (x86/Windows)
35              #            15 (x86/OS X)
36              #            19 (x86/OS X)
37              # 2013-02-10 13 (x86/Windows)
38              # 2013-02-10 14 (x86/OSX)
39              # 2013-11-13 17 (x86/Windows, 64bit machine)
40              # 2015-07-11 21 (x86/Linux, 64bit machine) use +RTS -G1
41              # 2016-04-06 30 (x86/Linux, 64bit machine)
42            (wordsize(64), 61, 20)]),
43              #            28 (amd64/Linux)
44              #            34 (amd64/Linux)
45              # 2012-09-20 23 (amd64/Linux)
46              # 2012-10-03 25 (amd64/Linux if .hi exists)
47              # 2013-02-13 23, but unstable so increased to 10% range
48              # 2013-02-13 27, very unstable!
49              # 2014-09-10 29 (amd64/Linux) post-AMP-cleanup
50              # 2013-09-11 30, 10 (amd64/Linux)
51              # 2013-09-11 30, 15 (adapt to Phab CI)
52              # 2015-06-03 41, (amd64/Linux) use +RTS -G1
53              # 2015-10-28 55, (amd64/Linux) emit Typeable at definition site
54              # 2016-10-20 68, (amd64/Linux) allow top-level string literals
55              #                See the comment 16 on #8472.
56              # 2017-02-17 83  (amd64/Linux) Type-indexed Typeable
57              # 2017-03-31 61  (amd64/Linux) Fix memory leak in simplifier
58       compiler_stats_num_field('max_bytes_used',
59           [(platform('i386-unknown-mingw32'), 5719436, 20),
60                                  # 2010-05-17 5717704 (x86/Windows)
61                                  # 2013-02-10 5159748 (x86/Windows)
62                                  # 2013-02-10 5030080 (x86/Windows)
63                                  # 2013-11-13 7295012 (x86/Windows, 64bit machine)
64                                  # 2014-04-24 5719436 (x86/Windows, 64bit machine)
65            (wordsize(32), 9418680, 1),
66              #            6707308 (x86/OS X)
67              # 2009-12-31 6149572 (x86/Linux)
68              # 2014-01-22 6429864 (x86/Linux)
69              # 2014-06-29 5949188 (x86/Linux)
70              # 2015-07-11 6241108 (x86/Linux, 64-bit machine) use +RTS -G1
71              # 2016-04-06 9093608 (x86/Linux, 64-bit machine)
72              # 2017-03-24 9261052 (x86/Linux, 64-bit machine)
73              # 2017-04-06 9418680 (x86/Linux, 64-bit machine)
74
75            (wordsize(64), 19199872, 15)]),
76              # 2014-09-10 10463640, 10  # post-AMP-update (somewhat stabelish)
77                # looks like the peak is around ~10M, but we're
78                # unlikely to GC exactly on the peak.
79                # varies quite a lot with CLEANUP and BINDIST,
80                # hence 10% range.
81                # See Note [residency] to get an accurate view.
82              # 2014-09-14  9684256, 10 # try to lower it a bit more to match Phab's CI
83              # 2014-11-03 10584344,    # ghcspeed reports higher numbers consistently
84              # 2015-07-11 11670120 (amd64/Linux)
85              # 2015-10-28 15017528 (amd64/Linux) emit typeable at definition site
86              # 2016-10-12 17285216 (amd64/Linux) it's not entirely clear why
87              # 2017-02-01 19924328 (amd64/Linux) Join points (#12988)
88              # 2017-02-14 16393848 Early inline patch
89              # 2017-03-31 16679176 Fix memory leak in simplifier
90              # 2017-08-25 19199872 Refactor the Mighty Simplifier
91
92       compiler_stats_num_field('bytes allocated',
93           [(platform('i386-unknown-mingw32'), 301784492, 5),
94                                  #            215582916 (x86/Windows)
95                                  # 2012-10-29 298921816 (x86/Windows)
96                                  # 2013-02-10 310633884 (x86/Windows)
97                                  # 2013-11-13 317975916 (x86/Windows, 64bit machine)
98                                  # 2014-04-04 301784492 (x86/Windows, 64bit machine)
99            (wordsize(32), 324586096, 1),
100              #            221667908 (x86/OS X)
101              #            274932264 (x86/Linux)
102              # 2012-10-08 303930948 (x86/Linux, new codegen)
103              # 2013-02-10 322937684 (x86/OSX)
104              # 2014-01-22 316103268 (x86/Linux)
105              # 2014-06-29 303300692 (x86/Linux)
106              # 2015-07-11 288699104 (x86/Linux, 64-bit machine) use +RTS -G1
107              # 2016-04-06 344730660 (x86/Linux, 64-bit machine)
108              # 2017-03-24 324586096 (x86/Linux, 64-bit machine)
109            (wordsize(64), 659863176, 5)]),
110              # 2009-11-17 434845560 (amd64/Linux)
111              # 2009-12-08 459776680 (amd64/Linux)
112              # 2010-05-17 519377728 (amd64/Linux)
113              # 2011-08-05 561382568 (amd64/OS X)
114              # 2012-07-16 589168872 (amd64/Linux)
115              # 2012-07-20 595936240 (amd64/Linux)
116              # 2012-08-23 606230880 (amd64/Linux)
117              # 2012-08-29 633334184 (amd64/Linux) new codegen
118              # 2012-09-18 641959976 (amd64/Linux)
119              # 2012-10-19 661832592 (amd64/Linux) -fPIC turned on
120              # 2012-10-23 642594312 (amd64/Linux) -fPIC turned off again
121              # 2012-11-12 658786936 (amd64/Linux) UNKNOWN REASON
122              # 2013-91-17 667160192 (x86_64/Linux) new demand analyser
123              # 2013-10-18 698612512 (x86_64/Linux) fix for #8456
124              # 2014-02-10 660922376 (x86_64/Linux) call arity analysis
125              # 2014-07-17 651626680 (x86_64/Linux) roundabout update
126              # 2014-09-10 630299456 (x86_64/Linux) post-AMP-cleanup
127              # 2015-06-03 581460896 (x86_64/Linux) use +RTS -G1
128              # 2015-10-28 695430728 (x86_64/Linux) emit Typeable at definition site
129              # 2015-10-28 756138176 (x86_64/Linux) inst-decl defaults go via typechecker (#12220)
130              # 2017-02-17 831733376 (x86_64/Linux) Type-indexed Typeable
131              # 2017-02-25 695354904 (x86_64/Linux) Early inlining patch
132              # 2017-04-21 659863176 (x86_64/Linux) Unknown
133       only_ways(['normal']),
134
135       extra_hc_opts('-dcore-lint -static'),
136           # Leave -dcore-lint on for this one test, so that we have something
137           # that will catch a regression in -dcore-lint performance.
138
139       # Use `+RTS -G1` for more stable residency measurements. Note [residency].
140       extra_hc_opts('+RTS -G1 -RTS')
141       ],
142      compile,
143      [''])
144
145 # This one tests for the space leak in the native code generator,
146 # where it holds onto the entire asm output until the end.  The space
147 # leak reappears from time to time, so it's a good idea to have a test
148 # for it.  The residency of this test will jump by 10MB to 40MB or so
149 # on x86-64 if the space leak appears.
150
151 # Only run this one if we have an NCG:
152 if 'optasm' in config.compile_ways:
153    conf_3294 = only_ways(['normal'])
154 else:
155    conf_3294 = skip
156
157 test('T3294',
158      [
159       compiler_stats_num_field('max_bytes_used', # Note [residency]
160           [(wordsize(32), 28686588, 15),
161              #            17725476 (x86/OS X)
162              #            14593500 (Windows)
163              # 2013-02-10 20651576 (x86/Windows)
164              # 2013-02-10 20772984 (x86/OSX)
165              # 2013-11-13 24009436 (x86/Windows, 64bit machine)
166              # 2014-04-24 19882188 (x86/Windows, 64bit machine)
167              # 2014-12-22 26525384 (x86/Windows) Increase due to silent superclasses?
168              # 2015-07-11 43196344 (x86/Linux, 64-bit machine) use +RTS -G1
169              # 2016-04-06 28686588 (x86/Linux, 64-bit machine)
170
171            (wordsize(64), 34050960, 20)]),
172              # prev:           25753192 (amd64/Linux)
173              # 29/08/2012:     37724352 (amd64/Linux)
174              #  (increase due to new codegen, see #7198)
175              # 13/13/2012:     44894544 (amd64/Linux)
176              #  (reason for increase unknown)
177              # 15/5/2013:      36904752  (amd64/Linux)
178              #  (reason for decrease unknown)
179              # 29/5/2013:      43224080  (amd64/Linux)
180              #  (reason for increase back to earlier value unknown)
181              # 2014-07-14:     36670800  (amd64/Linux)
182              #  (reason unknown, setting expected value somewhere in between)
183              # 2015-01-22:     45000000  (amd64/Linux)
184              #  varies between 40959592 and 52914488... increasing to +-20%
185              # 2015-10-28:     50367248  (amd64/Linux)
186              #  D757: emit Typeable instances at site of type definition
187              # 2016-07-11:     54609256  (Windows) before fix for #12227
188              # 2016-07-11:     52992688  (Windows) after fix for #12227
189              # 2017-02-17:     63131248  (amd64/Linux) Type indexed Typeable
190              # 2017-05-14:     34050960  (amd64/Linux) Two-pass CmmLayoutStack
191
192       compiler_stats_num_field('bytes allocated',
193           [(wordsize(32), 1377050640, 5),
194            # previous:     815479800  (x86/Linux)
195            # (^ increase due to new codegen, see #7198)
196            # 2012-10-08:  1373514844 (x86/Linux)
197            # 2013-11-13: 1478325844  (x86/Windows, 64bit machine)
198            # 2014-01-12: 1565185140  (x86/Linux)
199            # 2013-04-04: 1377050640  (x86/Windows, 64bit machine)
200            (wordsize(64), 2253557280, 5)]),
201             # old:        1357587088 (amd64/Linux)
202             # 29/08/2012: 2961778696 (amd64/Linux)
203             # (^ increase due to new codegen, see #7198)
204             # 18/09/2012: 2717327208 (amd64/Linux)
205             # 08/06/2013: 2901451552 (amd64/Linux) (reason unknown)
206             # 12/12/2013: 3083825616 (amd64/Linux) (reason unknown)
207             # 18/02/2014: 2897630040 (amd64/Linux) (call arity improvements)
208             # 12/03/2014: 2705289664 (amd64/Linux) (more call arity improvements)
209             # 2014-17-07: 2671595512 (amd64/Linux) (round-about update)
210             # 2014-09-10: 2709595808 (amd64/Linux) post-AMP cleanup
211             # 2016-07-11: 2664479936 (Windows) before fix for #12227
212             # 2016-07-11: 2739731144 (Windows) after fix for #12227 (ignoring)
213             # 2017-02-17: 2758641264 (amd64/Linux) (Type indexed Typeable)
214             # 2017-05-14: 2253557280 (amd64/Linux) Two-pass CmmLayoutStack
215       conf_3294,
216
217       # Use `+RTS -G1` for more stable residency measurements. Note [residency].
218       extra_hc_opts('+RTS -G1 -RTS')
219       ],
220      compile,
221      [''])
222
223 test('T4801',
224      [ # expect_broken(5224),
225        # temporarily unbroken (#5227)
226 ###################################
227 # deactivated for now, as this metric became too volatile recently
228 #      compiler_stats_num_field('peak_megabytes_allocated',# Note [residency]
229 #          [(platform('x86_64-apple-darwin'), 70, 1),
230 #                           # expected value: 58 (amd64/OS X)
231 #                           # 13/01/2014 - 70
232 #           (wordsize(32), 30, 20),
233 #           (wordsize(64), 48, 20)]),
234 #            # prev:       50 (amd64/Linux)
235 #            # 19/10/2012: 64 (amd64/Linux)
236 #            #                (^ REASON UNKNOWN!)
237 #            # 12/11/2012: 49 (amd64/Linux)
238 #            #                (^ REASON UNKNOWN!)
239 #            # 28/8/13:    60 (amd64/Linux)
240 #            #                (^ REASON UNKNOWN!)
241 #            # 2014-09-10: 55 post-AMP-cleanup
242 #            # 2014-10-08: 62 (jumps between 55 and 71 observed -- GC tipping point?)
243 #            # 2014-10-13: 48 stricter seqDmdType
244
245       compiler_stats_num_field('bytes allocated',
246           [(platform('x86_64-apple-darwin'), 417302064, 10),
247            # prev:       510938976 (amd64/OS X):
248            # 2015-12-11: 465653312 (amd64/OS X) Update, bump tolerance to +/-10%
249            # 2017-03-24: 417302064 (amd64/OS X) Correlated with Linux improvement
250
251            (wordsize(32), 199856388, 10),
252            # prev:        185669232 (x86/OSX)
253            # 2014-01-22:  211198056 (x86/Linux)
254            # 2014-09-03:  185242032 (Windows laptop)
255            # 2014-12-01:  203962148 (Windows laptop)
256            # 2016-04-06:  239556572 (x86/Linux)
257            # 2017-03-24:  199856388 (x86/Linux)
258            (wordsize(64), 388898280, 10)]),
259             # prev:       360243576 (amd64/Linux)
260             # 19/10/2012: 447190832 (amd64/Linux) (-fPIC turned on)
261             # 19/10/2012: 392409984 (amd64/Linux) (-fPIC turned off)
262             # 2014-04-08: 362939272 (amd64/Linux) cumulation of various smaller improvements over recent commits
263             # 2014-10-08: 382056344 (amd64/Linux) stricter foldr2 488e95b
264             # 2015-10-28: 434278248 (amd64/Linux) emit Typeable at definition site
265             # 2016-10-19: 388898280 (amd64/Linux) Refactor traceRn interface (#12617)
266
267 ###################################
268 # deactivated for now, as this metric became too volatile recently
269 #
270 #     compiler_stats_num_field('max_bytes_used',
271 #         [(platform('x86_64-apple-darwin'), 25145320, 5),
272 #          (wordsize(32), 11829000, 15),
273 #            #              9651948 (x86/OSX)
274 #            #              10290952 (windows)
275 #            # 2013-02-10   11071060 (x86/Windows)
276 #            # 2013-02-10:  11207828 (x86/OSX)
277 #            # (some date): 11139444
278 #            # 2013-11-13:  11829000 (x86/Windows, 64bit machine)
279 #          (wordsize(64), 19296544, 15)]),
280 #               # prev:       20486256 (amd64/OS X)
281 #               # 30/08/2012: 17305600--20391920 (varies a lot)
282 #               # 19/10/2012: 26882576 (-fPIC turned on)
283 #               # 19/10/2012: 18619912 (-fPIC turned off)
284 #               # 24/12/2012: 21657520 (perhaps gc sampling time wibbles?)
285 #               # 10/01/2014: 25166280
286 #               # 13/01/2014: 22646000 (mostly due to #8647)
287 #               # 18/02/2014: 25002136 (call arity analysis changes)
288 #               # 12/05/2014: 25002136 (specialisation and inlining changes)
289 #               # 10/09/2014: 19296544, 10 (post-AMP-cleanup)
290 #               # 14/09/2014: 19585456, 15 (adapt to Phab CI env)
291        only_ways(['normal']),
292        extra_hc_opts('-static'),
293
294        # Use `+RTS -G1` for more stable residency measurements. Note [residency].
295        extra_hc_opts('+RTS -G1 -RTS')
296        ],
297      compile,
298      [''])
299
300 test('T3064',
301      [compiler_stats_num_field('peak_megabytes_allocated',# Note [residency]
302           [(wordsize(32), 36, 20),
303             # expected value: 14 (x86/Linux 28-06-2012):
304             # 2013-11-13:     18 (x86/Windows, 64bit machine)
305             # 2014-01-22:     23 (x86/Linux)
306             # 2014-12-22:     23 (x86/Linux) death to silent superclasses
307             # 2015-07-11:     28 (x86/Linux, 64-bit machine) use +RTS -G1
308             # 2017-04-06:     36 (x86/Linux, 64-bit machine) it's unclear
309
310            (wordsize(64), 66, 20)]),
311             # (amd64/Linux):            18
312             # (amd64/Linux) 2012-02-07: 26
313             # (amd64/Linux) 2013-02-12: 23; increased range to 10%
314             # (amd64/Linux) 2013-04-03: 26
315             # (amd64/Linux) 2013-09-11: 30; result of AMP patch
316             # Increased range to 20%.  peak-usage varies from 22 to 26,
317             #  depending on whether the old .hi file exists
318             # (amd64/Linux) 2013-09-11: 37; better arity analysis (weird)
319             # (amd64/Linux) (09/09/2014): 42, AMP changes (larger interfaces, more loading)
320             # (amd64/Linux) 2014-10-13: 38: Stricter seqDmdType
321             # (amd64/Linux) 2014-12-22: 27: death to silent superclasses
322             # (amd64/Linux) 2015-01-22: 32: Varies from 30 to 34, at least here.
323             # (amd64/Linux) 2015-06-03: 54: use +RTS -G1
324             # (amd64/Linux) 2016-10-25: 66: Presumably creep
325
326       compiler_stats_num_field('bytes allocated',
327           [(wordsize(32), 134044092, 10),
328             # 2011-06-28: 56380288  (x86/Linux)
329             # 2012-10-30: 111189536 (x86/Windows)
330             # 2013-11-13: 146626504 (x86/Windows, 64bit machine)
331             # 2014-01-22: 162457940 (x86/Linux)
332             # 2014-12-01: 162457940 (Windows)
333             # 2014-12-22: 122836340 (Windows) Death to silent superclasses
334             # 2016-04-06: 153261024 (x86/Linux) probably wildcard refactor
335             # 2017-03-24: 134044092 (x86/Linux, 64-bit machine) Update
336
337            (wordsize(64), 281509496, 5)]),
338             # (amd64/Linux) (2011-06-28):  73259544
339             # (amd64/Linux) (2013-02-07): 224798696
340             # (amd64/Linux) (2013-08-02): 236404384, increase from roles
341             # (amd64/Linux) (2013-09-11): 290165632, increase from AMP warnings
342             # (amd64/Linux) (2013-11-22): 308300448, GND via Coercible and counters for constraints solving
343             # (amd64/Linux) (2013-12-02): 329795912, Coercible refactor
344             # (amd64/Linux) (2014-02-11): 308422280, optimize Coercions in simpleOptExpr
345             # (amd64/Linux) (2014-05-23): 324022680, unknown cause
346             # (amd64/Linux) (2014-07-17): 332702112, general round of updates
347             # (amd64/Linux) (2014-08-29): 313638592, w/w for INLINABLE things
348             # (amd64/Linux) (2014-09-09): 407416464, AMP changes (larger interfaces, more loading)
349             # (amd64/Linux) (2014-09-14): 385145080, BPP changes (more NoImplicitPrelude in base)
350             # (amd64/Linux) (2014-12-10): 363103840, improvements in constraint solver
351             # (Mac)         (2014-12-18): 350418600, improvements to flattener
352             # (amd64/Linux) (2014-12-22): 243670824, Ha! Death to superclass constraints, makes
353             #                                        much less code for Monad instances
354             # (amd64/Linux) (2015-12-01): 264952256, Regression due to Simon's wildcard refactor
355             #                                        Tracked as #11151.
356             # (amd64/Linux) (2015-12-11): 304344936, Regression due to TypeInType
357             #                                        Tracked as #11196
358             # (amd64/Linux) (2016-04-15): 287460128  Improvement due to using coercionKind instead
359             #                                        of zonkTcType (Trac #11882)
360             # (amd64/Darwin) (2017-01-23): 306222424 Presumably creep from recent changes (Typeable?)
361             # (amd64/Linux) (2017-02-14): 259815560  Early inline patch: 9% improvement
362             # (amd64/Linux) (2017-03-31): 265950920  Fix memory leak in simplifier
363             # (amd64/Linux) (2017-05-01): 281509496  Avoid excessive space usage from unfoldings in CoreTidy
364
365 ###################################
366 # deactivated for now, as this metric became too volatile recently
367 #
368 #      compiler_stats_num_field('max_bytes_used',
369 #          [(wordsize(32), 11202304, 20),
370 #            # 2011-06-28:  2247016 (x86/Linux) (28/6/2011):
371 #            #(some date):  5511604
372 #            # 2013-11-13:  7218200 (x86/Windows, 64bit machine)
373 #            # 2014-04-04: 11202304 (x86/Windows, 64bit machine)
374 #           (wordsize(64), 13251728, 20)]),
375 #            # (amd64/Linux, intree) (28/06/2011):  4032024
376 #            # (amd64/Linux, intree) (07/02/2013):  9819288
377 #            # (amd64/Linux)         (14/02/2013):  8687360
378 #            # (amd64/Linux)         (18/02/2013):  9397488
379 #            # (amd64/Linux)         (02/08/2013): 10742536, increase from roles
380 #            # (amd64/Linux)         (19/08/2013): 9211816,  decrease apparently from better eta reduction
381 #            # (amd64/Linux)         (11/09/2013): 12000480, increase from AMP warnings
382 #            #                                     933cdf15a2d85229d3df04b437da31fdfbf4961f
383 #            # (amd64/Linux)         (22/11/2013): 16266992, GND via Coercible and counters for constraints solving
384 #            # (amd64/Linux)         (12/12/2013): 19821544, better One shot analysis
385 #            # (amd64/Linux)         (09/09/2014): 24357392, AMP changes (larger interfaces, more loading)
386 #            # (amd64/Linux)         (14/09/2014): 16053888, BPP changes (more NoImplicitPrelude in base)
387 #            # (amd64/Linux)         (19/09/2014): 18744992, unknown
388 #            # (amd64/Linux)         2014-10-13:   13251728, Stricter seqDmdType
389
390        only_ways(['normal']),
391
392        # Use `+RTS -G1` for more stable residency measurements. Note [residency].
393        extra_hc_opts('+RTS -G1 -RTS')
394       ],
395      compile,
396      [''])
397
398 test('T4007',
399      normal,
400      run_command,
401      ['$MAKE -s --no-print-directory T4007'])
402
403 test('T5030',
404      [compiler_stats_num_field('bytes allocated',
405           [(wordsize(32), 345668088, 10),
406            # previous:    196457520
407            # 2012-10-08:  259547660 (x86/Linux, new codegen)
408            # 2013-11-21:  198573456 (x86 Windows, 64 bit machine)
409            # 2014-12-10:  227205560 constraint solver got worse again; more aggressive solving
410            #                        of family-applications leads to less sharing, I think
411            # 2015-07-11:  201882912 reason unknown
412            # 2016-04-06:  345668088 likely TypeInType
413
414            (wordsize(64), 794426536, 10)]),
415              # Previously 530000000 (+/- 10%)
416              # 17/1/13:   602993184  (x86_64/Linux)
417              #            (new demand analyser)
418              # 2013-06-08 538467496  (x86_64/Linux)
419              # ^ reason unknown
420              # 2013-08-02 454498592  (amd64/Linux)
421              # decrease from more aggressive coercion optimisations from roles
422              # 2013-11-12 397672152  (amd64/Linux)
423              # big decrease following better CSE and arity
424              # 2014-07-17 409314320  (amd64/Linux)
425              # general round of updates
426              # 2014-09-10 385152728  post-AMP-cleanup
427              # 2014-12-08 340969128  constraint solver perf improvements (esp kick-out)
428              # 2014-12-10 449042120  constraint solver got worse again; more aggressive solving
429              #                          of family-applications leads to less sharing, I think
430              # 2015-03-17 403932600  tweak to solver algorithm
431              # 2015-12-11 653710960  TypeInType (see #11196)
432              # 2016-10-17 794426536  20% big increase following
433              #                       31621b12 * A collection of type-inference refactorings.
434              #                       See ticket for more info
435
436        only_ways(['normal'])
437       ],
438      compile,
439      ['-freduction-depth=300'])
440
441 test('T5631',
442      [compiler_stats_num_field('bytes allocated',
443           [(wordsize(32), 570137436, 10),
444         # expected value: 392904228 (x86/Linux)
445         # 2014-04-04:     346389856 (x86 Windows, 64 bit machine)
446         # 2014-12-01:     390199244 (Windows laptop)
447         # 2016-04-06:     570137436 (amd64/Linux) many reasons
448            (wordsize(64), 1106015512, 5)]),
449         # expected value: 774595008 (amd64/Linux):
450         # expected value: 735486328 (amd64/Linux) 2012/12/12:
451         # expected value: 690742040 (amd64/Linux) Call Arity improvements
452         # 2014-09-09:     739704712 (amd64/Linux) AMP changes
453         # 2014-11-04:     776121120 (amd64/Linux) new-flatten-skolems
454         # 2015-06-01:     812288344 (amd64/Linux) unknown cause
455         # 2015-12-11:     1128828928 (amd64/Linux) TypeInType (see #11196)
456         # 2015-12-21:     1198327544 (Mac) TypeApplications (will fix with #11196)
457         # 2015-03-18:     1124068664 (Mac) optimize Unify & zonking
458         # 2016-10-19:     1024926024 (amd64/Linux) Refactor traceRn interface (#12617)
459         # 2016-11-10:     1077429456 (amd64/Linux) Stop -dno-debug-output suppressing -ddump-tc-trace
460         # 2017-02-17:     1517484488 (amd64/Linux) Type-indexed Typeable
461         # 2017-03-03:     1065147968 (amd64/Linux) Share Typeable KindReps
462         # 2017-03-31:     1037482512 (amd64/Linux) Fix memory leak in simplifier
463         # 2017-07-27:     1106015512 (Mac) Regresssion from tracking visibility in TypeEqOrigin
464         #                                  should be fixed by #14037
465        only_ways(['normal'])
466       ],
467      compile,
468      [''])
469
470 test('parsing001',
471      [compiler_stats_num_field('bytes allocated',
472           [(wordsize(32), 232777056, 10),
473         # Initial:        274000576
474         # 2017-03-24:     232777056
475            (wordsize(64), 463931280, 5)]),
476         # expected value: 587079016 (amd64/Linux)
477         # 2016-09-01:     581551384 (amd64/Linux) Restore w/w limit (#11565)
478         # 2016-12-19:     493730288 (amd64/Linux) Join points (#12988)
479         # 2017-02-14:     463931280 Early inlining patch; acutal improvement 7%
480        only_ways(['normal']),
481       ],
482      compile_fail, [''])
483
484
485 test('T783',
486      [ only_ways(['normal']),  # no optimisation for this one
487       # expected value: 175,569,928 (x86/Linux)
488       compiler_stats_num_field('bytes allocated',
489           [(wordsize(32), 225911912, 5),
490             # 2012-10-08: 226907420 (x86/Linux)
491             # 2013-02-10: 329202116 (x86/Windows)
492             # 2013-02-10: 338465200 (x86/OSX)
493             # 2014-04-04: 319179104 (x86 Windows, 64 bit machine)
494             # 2014-09-03: 223377364 (Windows) better specialisation, raft of core-to-core optimisations
495             # 2014-12-22: 235002220 (Windows) not sure why
496             # 2016-04-06: 249332816 (x86/Linux, 64-bit machine)
497             # 2017-03-24: 225911912 (x86/Linux, 64-bit machine)
498
499            (wordsize(64), 481875416, 10)]),
500             # prev:       349263216 (amd64/Linux)
501             # 07/08/2012: 384479856 (amd64/Linux)
502             # 29/08/2012: 436927840 (amd64/Linux)
503             # 12/11/2012: 640324528 (amd64/Linux)
504             #   (OldCmm removed: not sure why this got worse, the
505             #    other perf tests remained about the same)
506             # 18/10/2013: 734038080 (amd64/Linux)
507             #   (fix for #8456)
508             # 24/10/2013: 654804144 (amd64/Linux)
509             #   (fix previous fix for #8456)
510             # 2014-07-17: 640031840 (amd64/Linux)
511             #   (general round of updates)
512             # 2014-08-29: 441932632 (amd64/Linux)
513             #   (better specialisation, raft of core-to-core optimisations)
514             # 2014-08-29: 719814352 (amd64/Linux)
515             #   (changed order of cmm block causes analyses to allocate much more,
516             #      but the changed order is slighly better in terms of runtime, and
517             #      this test seems to be an extreme outlier.)
518             # 2015-05-16: 548288760 (amd64/Linux)
519             #   (improved sequenceBlocks in nativeCodeGen, #10422)
520             # 2015-08-07: 470738808 (amd64/Linux)
521             #   (simplifying the switch plan code path for simple checks, #10677)
522             # 2015-08-28: 526230456 (amd64/Linux)
523             #    (D757: Emit Typeable instances at site of type definition)
524             # 2015-12-04: 1134085384 (amd64/Linux)
525             #    (D1535: Major overhaul of pattern match checker, #11162)
526             # 2016-02-03: 488592288 (amd64/Linux)
527             #    (D1795: Another overhaul of pattern match checker, #11374)
528             # 2017-02-14    436978192    Early inlining: 5% improvement
529             # 2017-09-08    481875416    Unknown
530
531       extra_hc_opts('-static')
532       ],
533       compile,[''])
534
535 test('T5321Fun',
536      [ only_ways(['normal']),  # no optimisation for this one
537        compiler_stats_num_field('bytes allocated',
538            [(wordsize(32), 244387620, 10),
539              # prev:       300000000
540              # 2012-10-08: 344416344 x86/Linux
541              #  (increase due to new codegen)
542              # 2014-09-03: 299656164     (specialisation and inlining)
543              # 2014-12-10: 206406188     #  Improvements in constraint solver
544              # 2016-04-06: 279922360 x86/Linux
545              # 2017-03-24: 244387620 x86/Linux (64-bit machine)
546
547             (wordsize(64), 449577856, 5)])
548              # prev:       585521080
549              # 2012-08-29: 713385808     #  (increase due to new codegen)
550              # 2013-05-15: 628341952     #  (reason for decrease unknown)
551              # 2013-06-24: 694019152     #  (reason for re-increase unknown)
552              # 2014-05-12: 614409344     #  (specialisation and inlining changes)
553              # 2014-09-10: 601629032     #  post-AMP-cleanup
554              # 2014-11-06: 541287000     #  Simon's flat-skol changes to the constraint solver
555              # 2014-12-10: 408110888     #  Improvements in constraint solver
556              # 2014-12-16: 429921312     #  Flattener parameterized over roles
557              # 2015-08-10: 509921312
558              #  (undefined now takes an implicit parameter and GHC -O0 does
559              #  not recognize that the application is bottom)
560              # 2015-12-11: 565883176     #  TypeInType (see #11196)
561              # 2017-01-06: 497356688     #  Small coercion optimisations
562                                          #  The actual decrease was only 2%; earlier
563                                          #    commits had drifted down
564              # 2017-01-22: 525895608     #  Allow top-level string literals in Core. I'm not
565                                          #    convinced that this patch is
566                                          #    responsible for all of this
567                                          #    change, however. Namely I am
568                                          #    quite skeptical of the downward
569                                          #    "drift" reported above
570              # 2017-01-31: 498135752     #  Join points (#12988)
571              # 2017-02-23: 524706256     #  Type-indexed Typeable? (on Darwin)
572              # 2017-02-25: 488295304     #  Early inlining patch
573              # 2017-05-14: 449577856     #  (amd64/Linxu) Two-pass CmmLayoutStack
574       ],
575       compile,[''])
576
577 test('T5321FD',
578      [ only_ways(['normal']),  # no optimisation for this one
579       compiler_stats_num_field('bytes allocated',
580           [(wordsize(32), 250757460, 10),
581             # prev:       213380256
582             # 2012-10-08: 240302920 (x86/Linux)
583             #  (increase due to new codegen)
584             # 2014-07-31: 211699816 (Windows) (-11%)
585             #  (due to better optCoercion, 5e7406d9, #9233)
586             # 2016-04-06: 250757460 (x86/Linux)
587
588            (wordsize(64), 415136648, 10)])
589             # prev:       418306336
590             # 29/08/2012: 492905640
591             #  (increase due to new codegen)
592             # 15/05/2013: 406039584
593             #  (reason for decrease unknown)
594             # 08/06/2013: 476497048
595             #  (reason for increase unknown)
596             # before 2014-07-17: 441997096
597             #  (with -8%, still in range, hence cause not known)
598             # 2014-07-17: 426960992 (-11% of previous value)
599             #  (due to better optCoercion, 5e7406d9, #9233)
600             # 2014-10-08  410895536
601             #  (various changes; biggest improvements due to 949ad67 and FastString package ids)
602             # 2015-08-10: 470895536
603             #  (undefined now takes an implicit parameter and GHC -O0 does
604             #  not recognize that the application is bottom)
605             # 2015-10-28: 532365376
606             #  D757: emit Typeable instances at site of type definition
607             # 2016-07-16: 477840432
608             #  Optimize handling of built-in OccNames
609             # 2017-05-14: 415136648 (amd64/Linux) Two-pass CmmLayoutStack
610       ],
611       compile,[''])
612
613 test('T5642',
614      [ only_ways(['normal']),
615        normal,
616        compiler_stats_num_field('bytes allocated',
617            [(wordsize(32), 413517560, 10),
618                      # sample from x86/Linux
619             # prev:        650000000
620             # 2014-09-03:  753045568
621             # 2014-12-10:  641085256 Improvements in constraints solver
622             # 2016-04-06:  462677300
623             # 2017-03-24:  413517560 (x86/Linux, 64-bit machine)
624
625             (wordsize(64),  838316496, 10)])
626             # prev:        1300000000
627             # 2014-07-17:  1358833928 (general round of updates)
628             # 2014-08-07:  1402242360 (caused by 1fc60ea)
629 # Watch out for:
630             # 23/05/2014:  1452688392 (More aggressive specialisation means we get
631             #                          specialised copies of imported functions that
632             #                          are ultimately discarded by trimAutoRules
633             #                          It's a bizarre program with LOTS of data types)
634             # 2014-09-10:  1536924976 post-AMP-cleanup
635             # 2014-12-10:  1282916024 Improvements in constraints solver
636             # 2015-10-28:  1412808976 Emit Typeable at definition site
637             # 2015-11-22:  1071915072 Use TypeLits in the metadata encoding
638             # 2016-02-08:   950004816 Pattern match checker re-rework
639             # 2016-05-12:  1300685592 Make Generic1 poly-kinded
640             # 2016-06-05:   916484672 Refactor derived Generic instances to reduce allocations
641             # 2016-09-03:   838316496 Derive the Generic instance in perf/compiler/T5642
642       ],
643       compile,['-O'])
644
645 test('T5837',
646      [ only_ways(['normal']),
647       compiler_stats_num_field('bytes allocated',
648           [(wordsize(32), 27028956, 10),
649              # 40000000 (x86/Linux)
650              # 2013-11-13:  45520936 (x86/Windows, 64bit machine)
651              # 2014-09-03:  37096484 (Windows laptop, w/w for INLINABLE things
652              # 2014-12-01: 135914136 (Windows laptop, regression see below)
653              # 2014-12-08: 115905208  Constraint solver perf improvements (esp kick-out)
654              # 2016-04-06: 24199320  (x86/Linux, 64-bit machine) TypeInType
655              # 2017-03-24: 27028956  (x86/Linux, 64-bit machine)
656
657            (platform('x86_64-unknown-mingw32'), 59161648, 7),
658              # 2017-02-19                       59161648 (x64/Windows) - Unknown
659              # 2017-04-21                       54985248 (x64/Windows) - Unknown
660
661            (wordsize(64), 52089424, 7)])
662              # sample: 3926235424 (amd64/Linux, 15/2/2012)
663              # 2012-10-02 81879216
664              # 2012-09-20 87254264 amd64/Linux
665              # 2013-09-18 90587232 amd64/Linux
666              # 2013-11-21 86795752 amd64/Linux, GND via Coercible and counters
667              #                                  for constraints solving
668              # 2014-08-29 73639840 amd64/Linux, w/w for INLINABLE things
669              # 2014-10-08 73639840 amd64/Linux, Burning Bridges and other small changes
670              # 2014-11-06 271028976       Linux, Accept big regression;
671              #   See Note [An alternative story for the inert substitution] in TcFlatten
672              # 2014-12-08 234790312 Constraint solver perf improvements (esp kick-out)
673              # 2014-12-16 231155640 Mac  Flattener parameterized over roles;
674              #                           some optimization
675              # 2015-03-17 53424304  Mac  Better depth checking; fails earlier
676              # 2015-06-09 38834096  Better "improvement"; I'm not sure whey it improves things
677              # 2015-12-11 43877520  amd64/Linux, TypeInType (see #11196)
678              # 2016-03-18 48507272  Mac, accept small regression in exchange
679              #                           for other optimisations
680              # 2016-09-15 42445672  Linux; fixing #12422
681              # 2016-09-25 41832056  amd64/Linux, Rework handling of names (D2469)
682              # 2016-10-25 52597024  amd64/Linux, the test now passes (hooray), and so
683              #                          allocates more because it goes right down the
684              #                          compilation pipeline
685              # 2017-01-24 57861352  amd64/Linux, very likely due to the top-level strings
686              #                          in Core patch.
687              # 2017-02-07 50253880  Another improvement in SetLevels.  I don't think
688              #                      all the gain here is from this patch, but I think it
689              #                      just pushed it over the edge, so I'm re-centreing, and
690              #                      changing to 5% tolerance
691              # 2017-02-07 53592736  amd64/Linux Simon's earlier decrease appears
692              #                      to be environmentally-dependent.
693              #                      Also bumped acceptance threshold to 7%.
694              # 2017-02-20 58648600  amd64/Linux Type-indexed Typeable
695              # 2017-02-28 54151864  amd64/Linux Likely drift due to recent simplifier improvements
696              # 2017-02-25 52625920  amd64/Linux Early inlining patch
697              # 2017-09-06 56782344  amd64/Linux Drift manifest in unrelated LLVM patch
698              # 2017-10-24 52089424  amd64/linux Fix space leak in BinIface.getSymbolTable
699       ],
700       compile, ['-freduction-depth=50'])
701
702 test('T6048',
703      [ only_ways(['optasm']),
704       compiler_stats_num_field('bytes allocated',
705           [(wordsize(32), 55701280, 10),
706             # prev:       38000000 (x86/Linux)
707             # 2012-10-08: 48887164 (x86/Linux)
708             # 2014-04-04: 62618072 (x86 Windows, 64 bit machine)
709             # 2014-09-03: 56315812 (x86 Windows, w/w for INLINABLE)
710             # 2014-12-01: 49987836 (x86 Windows)
711             # 2016-04-06: 55701280 (x86/Linux, 64-bit machine)
712
713            (wordsize(64), 90996312, 10)])
714              # 2012-09-18  97247032 amd64/Linux
715              # 2014-01-16 108578664 amd64/Linux (unknown, likely foldl-via-foldr)
716              # 2014-01-18  95960720 amd64/Linux Call Arity improvements
717              # 2014-02-28 105556793 amd64/Linux (unknown, tweak in base/4d9e7c9e3 resulted in change)
718              # 2014-03-05 110646312 amd64/Linux Call Arity became more elaborate
719              # 2014-07-14 125431448 amd64/Linux unknown reason. Even worse in GHC-7.8.3. *shurg*
720              # 2014-08-29 108354472 amd64/Linux w/w for INLINABLE things
721              # 2014-09-14  88186056 amd64/Linux BPP part1 change (more NoImplicitPreludes in base)
722              # 2014-01-08  95946688 amd64/Linux Mostly 4c834fd. Occasional spikes to 103822120!
723              # 2016-03-11 108225624 amd64/Linux unknown reason sadly; likely gradual creep.
724              # 2016-11-25  94327392 amd64/Linux Back down again hooray; still not sure why
725              # 2017-02-17 115715592 amd64/Linux Type-indexed Typeable
726              # 2017-04-28 90996312 Join point refactoring
727       ],
728       compile,[''])
729
730 test('T9020',
731      [ only_ways(['optasm']),
732       compiler_stats_num_field('bytes allocated',
733           [(wordsize(32), 249904136, 10),
734            # Original:    381360728
735            # 2014-07-31:  343005716 (Windows) (general round of updates)
736            # 2017-03-24:  249904136 (x86/Linux, 64-bit machine)
737
738            (wordsize(64), 423163832, 10)])
739            # prev:        795469104
740            # 2014-07-17:  728263536 (general round of updates)
741            # 2014-09-10:  785871680 post-AMP-cleanup
742            # 2014-11-03:  680162056 Further Applicative and Monad adjustments
743            # 2015-10-21:  786189008 Make stronglyConnCompFromEdgedVertices deterministic
744            # 2016-01-26:  698401736 improvement from using ExpTypes instead of ReturnTvs
745            # 2016-04-06:  852298336 Refactoring of CSE #11781
746            # 2016-04-06:  698401736 Use thenIO in Applicative IO
747            # 2017-02-03:  764866144 Join points
748            # 2017-02-14:  500707080 Early inline patch; 35% decrease!
749            #                        Program size collapses in first simplification
750            # 2017-03-31:  493596312 Fix memory leak in simplifier
751            # 2017-04-28:  423163832  Remove exponential behaviour in simplifier
752       ],
753       compile,[''])
754
755 test('T9675',
756      [ only_ways(['optasm']),
757        compiler_stats_num_field('max_bytes_used', # Note [residency]
758           [(wordsize(64), 17675240, 15),
759           # 2014-10-13    29596552
760           # 2014-10-13    26570896   seq the DmdEnv in seqDmdType as well
761           # 2014-10-13    18582472   different machines giving different results..
762           # 2014-10-13    22220552   use the mean
763           # 2015-06-21    28056344   switch to `+RTS -G1`, tighten bound to 15%
764           # 2015-10-28    23776640   emit Typeable at definition site
765           # 2015-12-11    30837312   TypeInType (see #11196)
766           # 2016-03-14    38776008   Final demand analyzer run
767           # 2016-04-01    29871032   Fix leaks in demand analysis
768           # 2016-04-30    17675240   Fix leaks in tidy unfoldings
769            (wordsize(32), 18043224, 15)
770           # 2015-07-11    15341228   (x86/Linux, 64-bit machine) use +RTS -G1
771           # 2016-04-06    18043224   (x86/Linux, 64-bit machine)
772           ]),
773        compiler_stats_num_field('peak_megabytes_allocated', # Note [residency]
774           [(wordsize(64), 63, 15),
775           # 2014-10-13    66
776           # 2014-10-13    58         seq the DmdEnv in seqDmdType as well
777           # 2014-10-13    49         different machines giving different results...
778           # 2014-10-13    53         use the mean
779           # 2015-06-15    44         reduced for some reason
780           # 2015-06-21    105        switch to `+RTS -G1`
781           # 2015-12-04    88         new pattern checker (D1535)
782           # 2015-12-11    113        TypeInType (see #11196)
783           # 2016-04-14    144        Final demand analyzer run
784           # 2016-07-26    121        Unboxed sums?
785           # 2017-04-30    63         Fix leaks in tidy unfoldings
786             (wordsize(32), 56, 15)
787           # 2015-07-11    56         (x86/Linux, 64-bit machine) use +RTS -G1
788           ]),
789        compiler_stats_num_field('bytes allocated',
790           [(wordsize(64), 656137960, 10)
791           # 2014-10-13    544489040
792           # 2015-10-28    608284152  emit Typeable at definition site
793           # 2017-02-17    731171072  Type-indexed Typeable
794           # 2017-03-13    656137960  Put join ceiling underneath lambdas?
795
796           ,(wordsize(32), 322901484, 10)
797           # 2015-07-11    279480696  (x86/Linux, 64-bit machine) use +RTS -G1
798           # 2017-03-24    322901484  (x86/Linux, 64-bit machine)
799
800           ]),
801
802        # Use `+RTS -G1` for more stable residency measurements. Note [residency].
803        extra_hc_opts('+RTS -G1 -RTS')
804       ],
805      compile,
806      [''])
807
808 test('T9872a',
809      [ only_ways(['normal']),
810        compiler_stats_num_field('bytes allocated',
811           [(wordsize(64), 3005891848, 5),
812           # 2014-12-10    5521332656    Initally created
813           # 2014-12-16    5848657456    Flattener parameterized over roles
814           # 2014-12-18    2680733672    Reduce type families even more eagerly
815           # 2015-12-11    3581500440    TypeInType (see #11196)
816           # 2016-04-07    3352882080    CSE improvements
817           # 2016-10-19    3134866040    Refactor traceRn interface (#12617)
818           # 2017-02-17    3298422648    Type-indexed Typeable
819           # 2017-02-25    3005891848    Early inlining patch
820
821            (wordsize(32), 1493198244, 5)
822           # was           1325592896
823           # 2016-04-06    1740903516    x86/Linux
824           # 2017-03-24    1493198244    x86/Linux, 64-bit machine
825           ]),
826       ],
827      compile_fail,
828      [''])
829
830 test('T9872b',
831      [ only_ways(['normal']),
832        compiler_stats_num_field('bytes allocated',
833           [(wordsize(64), 3730686224, 5),
834           # 2014-12-10    6483306280    Initally created
835           # 2014-12-16    6892251912    Flattener parameterized over roles
836           # 2014-12-18    3480212048    Reduce type families even more eagerly
837           # 2015-12-11    5199926080    TypeInType (see #11196)
838           # 2016-02-08    4918990352    Improved a bit by tyConRolesRepresentational
839           # 2016-04-06:   4600233488    Refactoring of CSE #11781
840           # 2016-09-15:   4069522928    Fix #12422
841           # 2017-02-14    3730686224    Early inlining: 5% improvement
842
843            (wordsize(32), 1894037608, 5)
844           # was           1700000000
845           # 2016-04-06    2422750696    x86/Linux
846           # 2017-03-24    1894037608    x86/Linux, 64-bit machine
847           ]),
848       ],
849      compile_fail,
850      [''])
851 test('T9872c',
852      [ only_ways(['normal']),
853        compiler_stats_num_field('bytes allocated',
854           [(wordsize(64), 3404346032, 5),
855           # 2014-12-10    5495850096    Initally created
856           # 2014-12-16    5842024784    Flattener parameterized over roles
857           # 2014-12-18    2963554096    Reduce type families even more eagerly
858           # 2015-12-11    4723613784    TypeInType (see #11196)
859           # 2016-02-08    4454071184    Improved a bit by tyConRolesRepresentational
860           # 2016-04-06:   4306667256    Refactoring of CSE #11781
861           # 2016-09-15:   3702580928    Fixing #12422
862           # 2017-02-14    3404346032    Early inlining: 5% improvement
863
864            (wordsize(32), 1727582260, 5)
865           # was           1500000000
866           # 2016-04-06    2257242896
867           # 2017-03-24    1727582260    x86/Linux, 64-bit machine
868           ]),
869       ],
870      compile_fail,
871      [''])
872 test('T9872d',
873      [ only_ways(['normal']),
874        compiler_stats_num_field('bytes allocated',
875           [(wordsize(64), 462817352, 5),
876           # 2014-12-18    796071864   Initally created
877           # 2014-12-18    739189056   Reduce type families even more eagerly
878           # 2015-01-07    687562440   TrieMap leaf compression
879           # 2015-03-17    726679784   tweak to solver; probably flattens more
880           # 2015-12-11    566134504   TypeInType; see #11196
881           # 2016-02-08    534693648   Improved a bit by tyConRolesRepresentational
882           # 2016-03-18    506691240   optimize Unify & zonking
883           # 2016-12-05    478169352   using tyConIsTyFamFree, I think, but only
884           #                           a 1% improvement 482 -> 478
885           # 2017-02-17    535565128   Type-indexed Typeable
886           # 2017-02-25    498855104   Early inlining
887           # 2017-03-03    462817352   Share Typeable KindReps
888
889            (wordsize(32), 232954000, 5)
890           # some date     328810212
891           # 2015-07-11    350369584
892           # 2016-04-06    264566040   x86/Linux
893           # 2017-03-24    232954000   x86/Linux, 64-bit machine
894           ]),
895       ],
896      compile,
897      [''])
898
899 test('T9961',
900      [ only_ways(['normal']),
901        compiler_stats_num_field('bytes allocated',
902           [(wordsize(64), 498326216, 5),
903           # 2015-01-12    807117816   Initally created
904           # 2015-spring   772510192   Got better
905           # 2015-05-22    663978160   Fix for #10370 improves it more
906           # 2015-10-28    708680480   x86_64/Linux   Emit Typeable at definition site
907           # 2015-12-17    745044392   x86_64/Darwin  Creep upwards
908           # 2016-03-20    519436672   x64_64/Linux   Don't use build desugaring for large lists (#11707)
909           # 2016-03-24    568526784   x64_64/Linux   Add eqInt* variants (#11688)
910           # 2016-09-01    537297968   x64_64/Linux   Restore w/w limit (#11565)
911           # 2016-12-19    571246936   x64_64/Linux   Join points (#12988)
912           # 2017-02-14    498326216   Early inline patch; 13% improvement
913
914            (wordsize(32), 255409052, 5)
915           # was           375647160
916           # 2016-04-06    275264188   x86/Linux
917           # 2017-03-24    255409052   x86/Linux, 64-bit machine
918           ]),
919       ],
920      compile,
921      ['-O'])
922
923 test('T9233',
924     [ only_ways(['normal']),
925       compiler_stats_num_field('bytes allocated',
926         [(wordsize(64),  924299320, 5),
927          # 2015-08-04    999826288     initial value
928          # 2016-04-14   1066246248     Final demand analyzer run
929          # 2016-06-18    984268712     shuffling around of Data.Functor.Identity
930          # 2017-01-20    920101608     Improvement to SetLevels apparently saved 4.2% in
931          #                             compiler allocation.  Program size seems virtually
932          #                             unchanged; maybe the compiler itself is a little faster
933          # 2017-01-23    861862608     worker/wrapper evald-ness flags; another 5% improvement!
934          # 2017-02-01    894486272     Join points
935          # 2017-02-07    884436192     Another improvement to SetLevels
936          # 2017-02-17    974530192     Type-indexed Typeable
937          # 2017-03-21    924299320     It's unclear
938
939          (wordsize(32),  460112888, 5)
940          # 2016-04-06    515672240     (x86/Linux) initial value
941          # 2017-03-24    460112888     x86/Linux, 64-bit machine
942         ]),
943       extra_clean(['T9233a.hi', 'T9233a.o'])
944     ],
945     multimod_compile,
946     ['T9233', '-v0 -O2 -fno-spec-constr'])
947
948 test('T10370',
949      [ only_ways(['optasm']),
950        compiler_stats_num_field('max_bytes_used', # Note [residency]
951           [(wordsize(64), 31524048, 15),
952           # 2015-10-22    19548720
953           # 2016-02-24    22823976   Changing Levity to RuntimeRep; not sure why this regresses though, even after some analysis
954           # 2016-04-14    28256896   final demand analyzer run
955           # 2016-08-08    33049304
956           #     This change happened because we changed the behavior
957           #     of inlining across hs-boot files, so that we don't
958           #     inline if something comes from a boot file.  This
959           #     affected stats on bootstrapped GHC.  However,
960           #     when I set -i0.01 with profiling, the heap profiles
961           #     were identical, so I think it's just GC noise.
962           # 2016-10-20    38221184   Allow top-level string literals.
963           #                          See the comment 16 on #8472.
964           # 2017-02-17    51126304   Type-indexed Typeable
965           # 2017-02-27    43455848   Likely drift from recent simplifier improvements
966           # 2017-02-25    41291976   Early inline patch
967           # 2017-04-30    31524048   Fix leaks in tidy unfoldings
968
969            (wordsize(32), 19276304, 15),
970           # 2015-10-22    11371496
971           # 2017-03-24    19276304 (x86/Linux, 64-bit machine)
972           ]),
973        compiler_stats_num_field('peak_megabytes_allocated', # Note [residency]
974           [(wordsize(64), 117, 15),
975           # 2015-10-22     76
976           # 2016-04-14    101 final demand analyzer run
977           # 2016-08-08    121 see above
978           # 2017-01-18    146 Allow top-level string literals in Core
979           # 2017-02-17    187 Type-indexed Typeable
980           # 2017-02-25    154 Early inline patch
981           # 2017-04-30    117 Fix leaks in tidy unfoldings
982            (wordsize(32),  69, 15),
983           # 2015-10-22     39
984           # 2017-03-24     69
985           ]),
986        # Use `+RTS -G1` for more stable residency measurements. Note [residency].
987        extra_hc_opts('+RTS -G1 -RTS')
988      ],
989      compile,
990      [''])
991
992 test('T10547',
993      [ compiler_stats_num_field('bytes allocated',
994           [(platform('x86_64-unknown-mingw32'), 37485128, 20),
995           # 2017-02-19                         37485128 (x64/Windows) - Unknown
996
997            (wordsize(64), 37681360, 20),
998           # initial:    39165544
999           # 2016-11-25: 31041520 Linux   Around the time of refactoring the constraint solver;
1000           #                              but I think that only pushed it over the edge
1001           # 2017-02-20: 38681216 Linux   Type-indexed Typeable
1002           ]),
1003      ],
1004      compile_fail,
1005      ['-fprint-expanded-synonyms'])
1006
1007 test('T12227',
1008      [ only_ways(['normal']),
1009        compiler_stats_num_field('bytes allocated',
1010           [(wordsize(64), 1060158624, 5),
1011           # 2016-07-11    5650186880 (Windows) before fix for #12227
1012           # 2016-07-11    1822822016 (Windows) after fix for #12227
1013           # 2016-12-20    1715827784 after d250d493 (INLINE in Traversable dms)
1014           #                          (or thereabouts in the commit history)
1015           # 2017-02-14    1060158624  Early inlining: 35% improvement
1016           ]),
1017      ],
1018      compile,
1019      # Use `-M1G` to prevent memory thrashing with ghc-8.0.1.
1020      ['-O2 -ddump-hi -ddump-to-file +RTS -M1G'])
1021
1022 test('T12425',
1023      [ only_ways(['optasm']),
1024        compiler_stats_num_field('bytes allocated',
1025           [(wordsize(64), 134780272, 5),
1026           # initial:      125831400
1027           # 2017-01-18:   133380960  Allow top-level string literals in Core
1028           # 2017-02-17:   153611448  Type-indexed Typeable
1029           # 2017-03-03:   142256192  Share Typeable KindReps
1030           # 2017-03-21:   134334800  Unclear
1031           # 2017-04-28:   127500136  Remove exponential behaviour in simplifier
1032           # 2017-05-23:   134780272  Addition of llvm-targets in dynflags (D3352)
1033           ]),
1034      ],
1035      compile,
1036      [''])
1037
1038 test('T12234',
1039      [ only_ways(['optasm']),
1040        compiler_stats_num_field('bytes allocated',
1041           [(platform('x86_64-unknown-mingw32'), 79889200, 5),
1042           # initial:      83032768
1043           # 2017-02-19    89180624 (x64/Windows) - Unknown
1044           # 2017-02-25    79889200 (x64/Windows) - Early inline patch
1045            (wordsize(64), 81696664, 5),
1046           # initial:      72958288
1047           # 2016-01-17:   76848856  (x86-64, Linux. drift?)
1048           # 2017-02-01:   80882208  (Use superclass instances when solving)
1049           # 2017-02-05:   74374440  (Probably OccAnal fixes)
1050           # 2017-02-17:   86525344  (Type-indexed Typeable)
1051           # 2017-02-25:   83032768  (Early inline patch)
1052           # 2017-09-07:   81696664  (Semigroup=>Monoid patch, D3927)
1053           ]),
1054      ],
1055      compile,
1056      [''])
1057
1058 test('T12545',
1059      [ only_ways(['normal']),
1060        compiler_stats_num_field('bytes allocated',
1061           [(wordsize(64), 3538652464, 5),
1062           # 2017-06-08    3538652464  initial
1063           ]),
1064        extra_clean(['T12545a.hi', 'T12545a.o'])
1065      ],
1066      multimod_compile,
1067      ['T12545', '-v0'] )
1068
1069 test('T13035',
1070      [ only_ways(['normal']),
1071        compiler_stats_num_field('bytes allocated',
1072           [(wordsize(64), 118665640, 5),
1073           # 2017-01-05   90595208  initial
1074           # 2017-01-19   95269000  Allow top-level string literals in Core
1075           # 2017-02-05   88806416  Probably OccAnal fixes
1076           # 2017-02-17   103890200 Type-indexed Typeable
1077           # 2017-02-25   98390488  Early inline patch
1078           # 2017-03-21   93249744  It's unclear
1079           # 2017-07-19   118665640 Generate Typeable bindings for data instances
1080           ]),
1081      ],
1082      compile,
1083      [''] )
1084
1085 test('T13056',
1086      [ only_ways(['optasm']),
1087        compiler_stats_num_field('bytes allocated',
1088          [(wordsize(64), 440548592, 10),
1089          # 2017-01-06    520166912 initial
1090          # 2017-01-31    546800240 Join points (#12988)
1091          # 2017-02-07    524611224 new SetLevels
1092          # 2017-02-14    440548592 Early inline patch: 16% improvement
1093          # 2017-04-21    417860736 (darwin)
1094          # 2017-04-22    Increase to +/- 10% (Darwin and Linux differ significantly)
1095          ]),
1096      ],
1097      compile,
1098      ['-O1'])
1099
1100 test('T12707',
1101      [ compiler_stats_num_field('bytes allocated',
1102           [(wordsize(64), 1163821528, 5),
1103           # initial:    1271577192
1104           # 2017-01-22: 1348865648  Allow top-level strings in Core
1105           # 2017-01-31: 1280336112  Join points (#12988)
1106           # 2017-02-11: 1310037632  Check local family instances vs imports
1107           # 2017-02-23: 1386110512  Type-indexed Typeable? (on Darwin)
1108           # 2017-03-02: 1231809592  Drift from recent simplifier improvements
1109           # 2017-05-14: 1163821528  (amd64/Linux) Two-pass CmmLayoutStack
1110           ]),
1111      ],
1112      compile,
1113      [''])
1114
1115 test('T12150',
1116      [ only_ways(['optasm']),
1117        compiler_stats_num_field('bytes allocated',
1118           [(wordsize(64), 73769936, 5)
1119           # initial:    70773000
1120           # 2017-08-25: 74358208  Refactor the Mighty Simplifier
1121           # 2017-08-25: 78300680  Drift
1122           # 2017-10-25: 73769936  amd64/linux Fix space leak in BinIface.getSymbolTable
1123           ]),
1124      ],
1125     compile,
1126      [''])
1127
1128 test('T13379',
1129      [ compiler_stats_num_field('bytes allocated',
1130           [(platform('x86_64-apple-darwin'), 453166912, 10),
1131           # 453166912: add osx-specific after two-pass CmmLayoutStack
1132            (wordsize(64), 411597856, 10),
1133           # initial:    411597856
1134           # widen window to 10%, Darwin had 449080520, a 9.1% difference
1135           ]),
1136      ],
1137      compile,
1138      [''])
1139
1140 test('MultiLayerModules',
1141      [ compiler_stats_num_field('bytes allocated',
1142           [(wordsize(64), 6294813000, 10),
1143           # initial:    12139116496
1144           # 2017-05-12: 6956533312   Revert "Use a deterministic map for imp_dep_mods"
1145           # 2017-05-31: 6294813000   Faster checkFamInstConsistency
1146           ]),
1147        pre_cmd('./genMultiLayerModules'),
1148        extra_files(['genMultiLayerModules']),
1149      ],
1150      multimod_compile,
1151      ['MultiLayerModules', '-v0'])
1152
1153 test('T13701',
1154      [ compiler_stats_num_field('bytes allocated',
1155           [(platform('x86_64-apple-darwin'), 2217187888, 10),
1156            (platform('x86_64-unknown-linux'), 2133380768, 10),
1157            # initial:     2511285600
1158            # 2017-06-23:  2188045288    treat banged variable bindings as FunBinds
1159            # 2017-07-11:  2187920960
1160            # 2017-07-12:  2412223768    inconsistency between Ben's machine and Harbormaster?
1161            # 2017-07-17:  2133380768    Resolved the issue causing the inconsistencies in this test
1162           ]),
1163        pre_cmd('./genT13701'),
1164        extra_files(['genT13701']),
1165      ],
1166      multimod_compile,
1167      ['T13701', '-v0'])
1168
1169 test('T13719',
1170      [ compiler_stats_num_field('bytes allocated',
1171           [(wordsize(64), 5187889872, 10),
1172           # initial:    49907410784
1173           # 2017-05-31: 5187889872   Faster checkFamInstConsistency
1174           ]),
1175        pre_cmd('./genT13719'),
1176        extra_files(['genT13719']),
1177      ],
1178      multimod_compile,
1179      ['T13719', '-v0'])
1180
1181 test('Naperian',
1182      [ reqlib('vector'),
1183        only_ways(['optasm']),
1184        compiler_stats_num_field('bytes allocated',
1185           [(wordsize(64), 2381935784, 10)])
1186      ],
1187      compile,
1188      [''])
1189
1190 test ('T9630',
1191       [ compiler_stats_num_field('max_bytes_used', # Note [residency]
1192           [(wordsize(64), 41568168, 15)
1193           # initial:    56955240
1194           # 2017-06-07: 41568168     Stop the specialiser generating loopy code
1195           ]),
1196       extra_clean(['T9630a.hi', 'T9630a.o'])
1197       ],
1198       multimod_compile,
1199       ['T9630', '-v0 -O'])