summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2018-12-28 19:19:48 -0500
committerBen Gamari <ben@smart-cactus.org>2018-12-28 19:21:52 -0500
commit9bce364125b55407e632d9a2061d09c6f346fa71 (patch)
treecb7f7068391bde6931bfd8336d2ddbb3c83f8a6d
parentfdf11c90992762f6f6264b8d8c1678c4ddd53eb8 (diff)
downloadhaskell-wip/disable-fragile-unreg-tests.tar.gz
testsuite: Disable more tests in unregisterised buildwip/disable-fragile-unreg-tests
This disables `ghcilink005`, `foreignInterruptable`, and `T7040_ghci` in the unregisterised build as they tend to fail non-deterministically. See ticket #16085.
-rw-r--r--testsuite/tests/ghci/linking/all.T8
-rw-r--r--testsuite/tests/rts/all.T2
-rw-r--r--testsuite/tests/th/all.T5
3 files changed, 12 insertions, 3 deletions
diff --git a/testsuite/tests/ghci/linking/all.T b/testsuite/tests/ghci/linking/all.T
index f9617c5cf7..4f12d2705e 100644
--- a/testsuite/tests/ghci/linking/all.T
+++ b/testsuite/tests/ghci/linking/all.T
@@ -19,8 +19,12 @@ test('ghcilink004',
when(arch('powerpc64') or arch('powerpc64le'), expect_broken(11259))],
run_command, ['$MAKE -s --no-print-directory ghcilink004'])
-test('ghcilink005', [extra_files(['TestLink.hs', 'f.c']),
- unless(doing_ghci, skip)], run_command,
+test('ghcilink005',
+ [extra_files(['TestLink.hs', 'f.c']),
+ # Fragile when unregisterised; see #16085
+ when(unregisterised(), skip),
+ unless(doing_ghci, skip)],
+ run_command,
['$MAKE -s --no-print-directory ghcilink005'])
test('ghcilink006', [unless(doing_ghci, skip)], run_command,
diff --git a/testsuite/tests/rts/all.T b/testsuite/tests/rts/all.T
index 466ee84d1c..41528405ae 100644
--- a/testsuite/tests/rts/all.T
+++ b/testsuite/tests/rts/all.T
@@ -247,6 +247,8 @@ test('T7040', [omit_ways(['ghci'])], compile_and_run, ['T7040_c.c'])
test('T7040_ghci',
[extra_files(['T7040_c.h']),
only_ways(['ghci']),
+ # Fragile when unregisterised; see #16085
+ when(unregisterised(), skip),
pre_cmd('$MAKE -s --no-print-directory T7040_ghci_setup')],
compile_and_run, ['T7040_ghci_c.o'])
diff --git a/testsuite/tests/th/all.T b/testsuite/tests/th/all.T
index 1bea110399..881ba81b18 100644
--- a/testsuite/tests/th/all.T
+++ b/testsuite/tests/th/all.T
@@ -149,7 +149,10 @@ test('T3177', normal, compile, ['-v0'])
test('T3177a', normal, compile_fail, ['-v0'])
test('T3319', normal, compile, ['-ddump-splices -v0'])
-test('TH_foreignInterruptible', normal, compile, ['-ddump-splices -v0'])
+test('TH_foreignInterruptible',
+ # Fragile when unregisterised; see #16085
+ when(unregisterised(), skip),
+ compile, ['-ddump-splices -v0'])
test('TH_foreignCallingConventions', normal,
compile,
['-ddump-splices -dsuppress-uniques -v0'])