diff options
author | Andreas Klebinger <klebinger.andreas@gmx.at> | 2022-09-16 14:36:15 +0200 |
---|---|---|
committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2022-10-17 19:21:52 -0400 |
commit | ff6275ef829873a70350c6d597e485bb84dd1bb1 (patch) | |
tree | e9837e8ad61c85fd02f7390aac6903751f585699 /testsuite/tests/codeGen | |
parent | 08ab5419286d2620f2e6762607bad03c5bcd29ad (diff) | |
download | haskell-ff6275ef829873a70350c6d597e485bb84dd1bb1.tar.gz |
Testsuite: Add a new tables_next_to_code predicate.
And use it to avoid T21710a failing on non-tntc archs.
Fixes #22169
Diffstat (limited to 'testsuite/tests/codeGen')
-rw-r--r-- | testsuite/tests/codeGen/should_compile/all.T | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/testsuite/tests/codeGen/should_compile/all.T b/testsuite/tests/codeGen/should_compile/all.T index 9569a0e64a..58600faa98 100644 --- a/testsuite/tests/codeGen/should_compile/all.T +++ b/testsuite/tests/codeGen/should_compile/all.T @@ -108,4 +108,7 @@ test('T18614', normal, compile, ['']) test('mk-big-obj', [unless(opsys('mingw32'), skip), pre_cmd('$PYTHON mk-big-obj.py > mk-big-obj.c')], multimod_compile, ['mk-big-obj.c', '-c -v0 -no-hs-main']) -test('T21710a', [ only_ways(['optasm']), when(wordsize(32), skip), grep_errmsg('(call)',[1]) ], compile, ['-ddump-cmm -dno-typeable-binds']) +test('T21710a', [ unless(tables_next_to_code(), skip) , when(wordsize(32), skip) + , only_ways(['optasm']) + , grep_errmsg('(call)',[1]) ] + , compile, ['-ddump-cmm -dno-typeable-binds']) |