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/ghc-api | |
| 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/ghc-api')
| -rw-r--r-- | testsuite/tests/ghc-api/T10052/all.T | 4 | ||||
| -rw-r--r-- | testsuite/tests/ghc-api/all.T | 9 | ||||
| -rw-r--r-- | testsuite/tests/ghc-api/dynCompileExpr/all.T | 2 |
3 files changed, 6 insertions, 9 deletions
diff --git a/testsuite/tests/ghc-api/T10052/all.T b/testsuite/tests/ghc-api/T10052/all.T index 7913ba4b4e..0e0f3bc866 100644 --- a/testsuite/tests/ghc-api/T10052/all.T +++ b/testsuite/tests/ghc-api/T10052/all.T @@ -1,3 +1,3 @@ -test('T10052', [when(arch('powerpc64') or arch('powerpc64le'), - expect_broken(11259)), req_interp], +test('T10052', [unless(config.have_RTS_linker, skip), + req_interp], makefile_test, ['T10052']) diff --git a/testsuite/tests/ghc-api/all.T b/testsuite/tests/ghc-api/all.T index b4e24ec2fd..8df85e07db 100644 --- a/testsuite/tests/ghc-api/all.T +++ b/testsuite/tests/ghc-api/all.T @@ -1,17 +1,14 @@ test('ghcApi', normal, compile_and_run, ['-package ghc']) test('T6145', normal, makefile_test, ['T6145']) -test('T8639_api', when(arch('powerpc64') or arch('powerpc64le'), - expect_broken(11259)), +test('T8639_api', unless (config.have_RTS_linker, skip), makefile_test, ['T8639_api']) -test('T8628', when(arch('powerpc64') or arch('powerpc64le'), - expect_broken(11259)), +test('T8628', unless(config.have_RTS_linker, skip), makefile_test, ['T8628']) test('T9595', extra_run_opts('"' + config.libdir + '"'), compile_and_run, ['-package ghc']) test('T10508_api', [ extra_run_opts('"' + config.libdir + '"'), - when(arch('powerpc64') or arch('powerpc64le'), - expect_broken(11259))], + unless(config.have_RTS_linker, skip)], compile_and_run, ['-package ghc']) test('T10942', extra_run_opts('"' + config.libdir + '"'), diff --git a/testsuite/tests/ghc-api/dynCompileExpr/all.T b/testsuite/tests/ghc-api/dynCompileExpr/all.T index 29c7ac695e..fd47e95a52 100644 --- a/testsuite/tests/ghc-api/dynCompileExpr/all.T +++ b/testsuite/tests/ghc-api/dynCompileExpr/all.T @@ -1,6 +1,6 @@ test('dynCompileExpr', [ extra_run_opts('"' + config.libdir + '"'), when(opsys('mingw32'), expect_broken_for(5987, ['dyn'])), - when(arch('powerpc64') or arch('powerpc64le'), expect_broken(11259)), + unless(config.have_RTS_linker, skip), omit_ways(prof_ways) ], # cannot run interpreted code with -prof compile_and_run, ['-package ghc']) |