diff options
| author | Peter Trommler <ptrommler@acm.org> | 2019-11-03 13:54:41 +0100 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2019-11-05 02:46:48 -0500 |
| commit | 487ede425bd0ef958481f0ca0b9614d362e10972 (patch) | |
| tree | 816f7bc6878726fa6be1e88d802a00c45b0f8ad9 /testsuite/tests/driver | |
| parent | d57059f72ed9a34f0589beac4feb41f8738dfdea (diff) | |
| download | haskell-487ede425bd0ef958481f0ca0b9614d362e10972.tar.gz | |
testsuite: skip test requiring RTS linker on PowerPC
The RTS linker is not available on 64-bit PowerPC. Instead of
marking tests that require the RTS linker as broken on PowerPC
64-bit skip the respective tests on all platforms where the
RTS linker or a statically linked external interpreter is not
available.
Fixes #11259
Diffstat (limited to 'testsuite/tests/driver')
| -rw-r--r-- | testsuite/tests/driver/all.T | 4 | ||||
| -rw-r--r-- | testsuite/tests/driver/linkwhole/all.T | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/testsuite/tests/driver/all.T b/testsuite/tests/driver/all.T index 239a70d2ba..3df5ca3f68 100644 --- a/testsuite/tests/driver/all.T +++ b/testsuite/tests/driver/all.T @@ -130,7 +130,7 @@ test('dynHelloWorld', ['']) test('T5313', - [ when(arch('powerpc64') or arch('powerpc64le'), expect_broken(11259)), + [ unless(config.have_RTS_linker, skip), extra_run_opts('"' + config.libdir + '"')], compile_and_run, ['-package ghc']) @@ -278,4 +278,4 @@ test('T16737', expect_broken_for(16541, ['ghci'])], compile_and_run, ['-optP=-isystem -optP=T16737include']) -test('T17143', exit_code(1), run_command, ['{compiler} T17143.hs -S -fno-code'])
\ No newline at end of file +test('T17143', exit_code(1), run_command, ['{compiler} T17143.hs -S -fno-code']) diff --git a/testsuite/tests/driver/linkwhole/all.T b/testsuite/tests/driver/linkwhole/all.T index ed5b9cc9f0..e4881bbcc5 100644 --- a/testsuite/tests/driver/linkwhole/all.T +++ b/testsuite/tests/driver/linkwhole/all.T @@ -1,6 +1,6 @@ test('linkwhole', [extra_files(['Types.hs','Main.hs','MyCode.hs','Handles.hs']), - when(arch('powerpc64') or arch('powerpc64le'), expect_broken(11259)), + unless(config.have_RTS_linker, skip), when(opsys('freebsd'), expect_broken(16035)), when(opsys('mingw32'), skip)], makefile_test, []) |