summaryrefslogtreecommitdiff
path: root/testsuite/tests/concurrent/prog002/all.T
blob: 4b330cde98d25c123e6f8ba8815000677fe25902 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
# Test for bug #713, results in crashes in GHC prior to 20060315 with +RTS -N2

# Add 'threaded2_hT' so that we have at least one test for bug #5127
if ghc_with_threaded_rts and ghc_with_smp:
   ways = ['threaded2_hT']
else:
   ways = []

# the conditions are fairly delicate.  It must be compiled without optimisation,
# hence -O0:

test('concprog002',
     [extra_files(['Event.hs', 'Scheduler.hs', 'Server.hs', 'Thread.hs']),
      only_ways(['threaded2', 'threaded2_hT']), extra_ways(ways), exit_code(1),
      when(fast(), skip), reqlib('random')],
     multimod_compile_and_run, ['Server', '-O0'])