all.T 1.19 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
25
26
27
test('outofmem', normal, run_command, ['$MAKE -s --no-print-directory outofmem'])
test('outofmem2', composes([ expect_fail_if_compiler_lt('ghc','6.9'),
                             extra_run_opts('+RTS -M5m -RTS')]),
                  run_command, ['$MAKE -s --no-print-directory outofmem2'])