diff options
author | Sven Tennie <sven.tennie@wire.com> | 2022-10-22 15:13:12 +0000 |
---|---|---|
committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2022-10-24 00:12:51 -0400 |
commit | f0a90c117ac598504ccb6514de77355de7415c86 (patch) | |
tree | f4ece7f2580898ebe3629fd3ecabddd68538cc64 | |
parent | 11fe42d89d37539bd90f31ca47547922b3fc84ae (diff) | |
download | haskell-f0a90c117ac598504ccb6514de77355de7415c86.tar.gz |
Pin used way for test cloneMyStack (#21977)
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.T | 6 |
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']) |