summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSven Tennie <sven.tennie@wire.com>2022-10-22 15:13:12 +0000
committerSven Tennie <sven.tennie@wire.com>2022-10-22 15:29:07 +0000
commit9251f9dcf1e7b8fac621db7fc134ea1bf17f14cc (patch)
tree25f5c4e05809cccfc6bd157ee75bb48e0f7b7cb6
parent1937016b7834338eef12be19caefc8e37a90cd29 (diff)
downloadhaskell-wip/pin_way_of_cloneMyStack_test.tar.gz
Pin used way for test cloneMyStack (#21977)wip/pin_way_of_cloneMyStack_test
cloneMyStack checks the order of closures on the cloned stack. This may change for different ways. Thus we limit this test to one way (normal).
-rw-r--r--testsuite/tests/rts/all.T6
1 files changed, 5 insertions, 1 deletions
diff --git a/testsuite/tests/rts/all.T b/testsuite/tests/rts/all.T
index 47c422c6d8..71d16bf748 100644
--- a/testsuite/tests/rts/all.T
+++ b/testsuite/tests/rts/all.T
@@ -482,7 +482,11 @@ test('T19381',
test('T20199', [ grep_errmsg('Hello') ]
, makefile_test, [])
-test('cloneMyStack', [extra_files(['cloneStackLib.c'])], compile_and_run, ['cloneStackLib.c'])
+# We need to be precise about the used way here as different ways may lead to
+# different closures (and their orders) on the stack (which is checked by this
+# test).
+test('cloneMyStack', [only_ways(['normal']), extra_files(['cloneStackLib.c'])],
+ compile_and_run, ['cloneStackLib.c'])
test('cloneMyStack2', ignore_stdout, compile_and_run, [''])
test('cloneMyStack_retBigStackFrame', [extra_files(['cloneStackLib.c']), ignore_stdout], compile_and_run, ['cloneStackLib.c'])
test('cloneThreadStack', [only_ways(['threaded1']), extra_ways(['threaded1']), extra_files(['cloneStackLib.c'])], compile_and_run, ['cloneStackLib.c -threaded'])