7522b10010eb9588170cf3dec9a1a7edc110cd1e
[ghc.git] / testsuite / tests / concurrent / prog003 / all.T
1 # This is a program for benchmarking mutable linked list
2 # implementations by Martin Sulzmann and Simon Marlow.  The reason it
3 # is here is that one variant of it demonstrated a nasty bug in the
4 # RTS, see the patch "Fix a bug that can lead to noDuplicate# not
5 # working sometimes", and the comments with stg_noDuplicatzh in
6 # rts/PrimOps.cmm.
7 #
8 # This test won't actually demonstrate the bug since it needs -N3 or
9 # greater (and hence a 3-core box) and the bug only manifests very
10 # occasionally, but at least the test is here for posterity.
11
12 test('concprog003',
13      [when(fast(), skip),
14       extra_clean([
15            'BackList2.hi', 'BackList2.o',
16            'ImmList.hi', 'ImmList.o',
17            'MainMVarList.hi', 'MainMVarList.o',
18            'TestDataParser.hi', 'TestDataParser.o',
19            'CASList.hi', 'CASList.o',
20            'IOList.hi', 'IOList.o',
21            'MVarListLockCoupling.hi', 'MVarListLockCoupling.o',
22            'TestRun.hi', 'TestRun.o',
23            'Collate.hi', 'Collate.o',
24            'LazyList2.hi', 'LazyList2.o',
25            'RefInterface.hi', 'RefInterface.o',
26            'Collection.hi', 'Collection.o',
27            'Main.hi', 'Main.o',
28            'TestData.hi', 'TestData.o'
29          ]),
30       reqlib('random'),
31       extra_run_opts('IMM -t test-8-3000-3000-2-1-4'),
32      ],
33      multimod_compile_and_run,
34      ['Main',''])