all.T 1.17 KB
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
test('derefnull',
11
             # SIGSEGV on Linux
Simon Marlow's avatar
Simon Marlow committed
12
     composes([exit_code(139),
13
             # SIGBUS on OX X
Simon Marlow's avatar
Simon Marlow committed
14
15
             exit_code_if_platform(138, 'i386-apple-darwin'),
             exit_code_if_platform(138, 'powerpc-apple-darwin'),
16
             exit_code_if_platform(1, 'i386-unknown-mingw32')]),
17
18
     compile_and_run, [''])
test('divbyzero',
19
             # SIGFPE on Linux
20
     compose(exit_code(136),
21
             exit_code_if_platform(1, 'i386-unknown-mingw32')),
22
     compile_and_run, [''])
Simon Marlow's avatar
Simon Marlow committed
23
24

test('outofmem', exit_code(1), compile_and_run, [''])
25
26
27
test('outofmem2', composes([exit_code(251),
                            expect_fail_if_compiler_lt('ghc','6.9'),
                            extra_run_opts('+RTS -M5m -RTS')]),
Simon Marlow's avatar
Simon Marlow committed
28
                  compile_and_run, [''])