blob: 2f7fe3bec8690dff3bccfe45dea09a49e8194832 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
# This is a program for benchmarking mutable linked list
# implementations by Martin Sulzmann and Simon Marlow. The reason it
# is here is that one variant of it demonstrated a nasty bug in the
# RTS, see the patch "Fix a bug that can lead to noDuplicate# not
# working sometimes", and the comments with stg_noDuplicatzh in
# rts/PrimOps.cmm.
#
# This test won't actually demonstrate the bug since it needs -N3 or
# greater (and hence a 3-core box) and the bug only manifests very
# occasionally, but at least the test is here for posterity.
test('concprog003',
[when(fast(), skip), reqlib('random'),
extra_run_opts('IMM -t test-8-3000-3000-2-1-4')],
multimod_compile_and_run, ['Main', ''])
|
