all.T 1.65 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
12
13
14
15
16
17
     composes([
             # SIGSEGV on Linux (which we make the default)
             exit_code(139),
             # Apparently the output can be different on different
             # Linux setups, so just ignore it. As long as we get
             # the right exit code we're OK.
             if_os('linux', ignore_output),
18
             # SIGBUS on OX X
19
             if_os('darwin', exit_code(138)),
20
             if_platform('i386-unknown-mingw32', exit_code(1))]),
21
22
     compile_and_run, [''])
test('divbyzero',
23
     composes([
24
             # SIGFPE on Linux
25
26
27
28
29
30
             exit_code(136),
             # Apparently the output can be different on different
             # Linux setups, so just ignore it. As long as we get
             # the right exit code we're OK.
             if_os('linux', ignore_output),
             if_platform('i386-unknown-mingw32', exit_code(1))]),
31
     compile_and_run, [''])
Simon Marlow's avatar
Simon Marlow committed
32

33
test('outofmem', normal, run_command, ['$MAKE -s --no-print-directory outofmem'])
34
test('outofmem2', extra_run_opts('+RTS -M5m -RTS'),
35
                  run_command, ['$MAKE -s --no-print-directory outofmem2'])
Simon Marlow's avatar
Simon Marlow committed
36
37
38

test('2047', compose(ignore_output, extra_run_opts('+RTS -c -RTS')),
             compile_and_run, ['-package containers'])