1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
|
test('space_leak_001',
# Before trac #2747 was fixed this was 565.
# Now it's: 3 (amd64/Linux)
# 4 (x86/OS X)
# 5 (x86/Linux)
[stats_num_field('peak_megabytes_allocated', (3, 1)),
# 3 (amd64/Linux, integer-gmp2)
stats_num_field('max_bytes_used',
[(wordsize(64), 440000, 15),
# 440224 (amd64/Linux)
# 417016 (x86/OS X)
# 415672 (x86/Windows)
# 481456 (unreg amd64/Linux)
(wordsize(32), 361400, 10)]),
# 2013-02-10 372072 (x86/OSX)
# 2013-02-10 439228 (x86/OSX)
# 2016-04-06 361400 (x86/Linux)
stats_num_field('bytes allocated',
[ (wordsize(64), 11315747416, 5),
# expected value: 9079316016 (amd64/Linux)
# 9331570416 (x86/Linux)
# 9329073952 (x86/OS X)
# 9327959840 (x86/Windows)
# 11315747416 (amd64/Lnx, integer-gmp2)
(wordsize(32), 13550759068, 5),
# 2014-12-01 13550759068 (Windows)
]),
omit_ways(['profasm','profthreaded','threaded1','threaded2'])
],
compile_and_run,
[''])
test('T4334',
# Test for a space leak in Data.List.lines (fixed with #4334)
[extra_run_opts('1000000 2 t'),
stats_num_field('peak_megabytes_allocated', (2, 1)),
# prof ways don't work well with +RTS -V0
omit_ways(['profasm','profthreaded'])
],
compile_and_run, [''])
test('T2762',
[# peak_megabytes_allocated is 2 with 7.0.2.
# Was 57 with 6.12.3.
# 2016-08-31: 3 (allocation area size bumped to 1MB)
stats_num_field('peak_megabytes_allocated', (3, 0)),
only_ways(['normal']),
extra_clean(['T2762A.hi', 'T2762A.o'])],
compile_and_run, ['-O'])
test('T4018',
[ only_ways(['optasm']), extra_run_opts('+RTS -M10m -RTS') ],
compile_and_run, ['-fno-state-hack'])
test('T4029',
[stats_num_field('peak_megabytes_allocated',
[(wordsize(64), 71, 10)]),
# 2016-02-26: 66 (amd64/Linux) INITIAL
# 2016-05-23: 82 (amd64/Linux) Use -G1
# 2016-07-13: 92 (amd64/Linux) Changes to tidyType
# 2016-09-01: 71 (amd64/Linux) Restore w/w limit (#11565)
stats_num_field('max_bytes_used',
[(wordsize(64), 21670448 , 5)]),
# 2016-02-26: 24071720 (amd64/Linux) INITIAL
# 2016-04-21: 25542832 (amd64/Linux)
# 2016-05-23: 25247216 (amd64/Linux) Use -G1
# 2016-07-13: 27575416 (amd64/Linux) Changes to tidyType
# 2016-07-20: 22920616 (amd64/Linux) Fix laziness of instance matching
# 2016-09-01: 21648488 (amd64/Linux) Restore w/w limit (#11565)
# 2016-10-13: 20325248 (amd64/Linux) Creep (downwards, yay!)
# 2016-11-14: 21387048 (amd64/Linux) Creep back upwards :(
# 2017-01-18: 21670448 (amd64/Linux) Float string literals to toplevel
extra_hc_opts('+RTS -G1 -RTS' ),
],
ghci_script,
['T4029.script'])
|