all.T 704 Bytes
Newer Older
1
test('testblockalloc', compose(c_src, 
2
                       compose(only_ways(['normal','threaded1']),
3
                               extra_run_opts('+RTS -I0'))), 
4
                       compile_and_run, [''])
Simon Marlow's avatar
Simon Marlow committed
5
6
7
8
9


# See bug #101, test requires +RTS -c (or equivalently +RTS -M<something>)
# only GHCi triggers the bug, but we run the test all ways for completeness.
test('bug1010', normal, compile_and_run, ['+RTS -c -RTS'])
10
11
12
13
14
15
16
17
test('derefnull',
     compose(exit_code(139),
             exit_code_if_platform(5, 'i386-unknown-mingw32')),
     compile_and_run, [''])
test('divbyzero',
     compose(exit_code(136),
             exit_code_if_platform(5, 'i386-unknown-mingw32')),
     compile_and_run, [''])