summaryrefslogtreecommitdiff
path: root/testsuite/tests/concurrent/prog001/all.T
blob: 70f38dca4fbbafedef400fce619b71c9a28f64ee (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
# Test for bug #1285326, results in "internal error: scavenge_one:
# strange object 47" with GHC 6.4, fixed in 6.4.1.

# Also tests for bug #1466.

# NB. This is a VERY IMPORTANT test!  It is the only good test we have
# for throwTo.  It has shown up several bugs that were not caught by the 
# other concurrency tests.

# The program appears to be sensitive to scheduling, and can diverge
# in some cases.  I find that it only reliably completes when given
# multiple cores, which is why it is only running the 'threaded2' way
# right now. --SDM 1/4/2010

test('concprog001',
     [skip_if_fast,
      only_ways(['threaded2']),
      extra_clean(['Arithmetic.hi', 'Arithmetic.o',
                   'Converter.hi',  'Converter.o',
                   'Mult.hi',       'Mult.o',
                   'Stream.hi',     'Stream.o',
                   'Thread.hi',     'Thread.o',
                   'Trit.hi',       'Trit.o',
                   'Utilities.hi',  'Utilities.o'])],
     multimod_compile_and_run,
     ['Mult',''])