summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2020-09-18 11:13:00 -0400
committerMarge Bot <ben+marge-bot@smart-cactus.org>2020-09-20 20:30:57 -0400
commitea08aead19087d21c5f7334e192cd4016ae57462 (patch)
treead2261932f5303d0fbf29c6a1800800e5ed7e83c
parentced8f113cc6421dfc36dd322ea85a78bfa3ff37e (diff)
downloadhaskell-ea08aead19087d21c5f7334e192cd4016ae57462.tar.gz
testsuite: Mark some GHCi/Makefile tests as broken on Windows
See #18718.
-rw-r--r--testsuite/tests/ghci/linking/dyn/all.T2
-rw-r--r--testsuite/tests/rts/T12771/all.T1
-rw-r--r--testsuite/tests/rts/T13082/all.T1
-rw-r--r--testsuite/tests/rts/T14611/all.T1
4 files changed, 5 insertions, 0 deletions
diff --git a/testsuite/tests/ghci/linking/dyn/all.T b/testsuite/tests/ghci/linking/dyn/all.T
index 127c9707a7..4c2e77873d 100644
--- a/testsuite/tests/ghci/linking/dyn/all.T
+++ b/testsuite/tests/ghci/linking/dyn/all.T
@@ -30,10 +30,12 @@ test('T10458',
ghci_script, ['T10458.script'])
test('T11072gcc', [extra_files(['A.c', 'T11072.hs']),
+ expect_broken(18718),
unless(doing_ghci, skip), unless(opsys('mingw32'), skip)],
makefile_test, ['compile_libAS_impl_gcc'])
test('T11072msvc', [extra_files(['A.c', 'T11072.hs', 'libAS.def', 'i686/', 'x86_64/']),
+ expect_broken(18718),
unless(doing_ghci, skip), unless(opsys('mingw32'), skip)],
makefile_test, ['compile_libAS_impl_msvc'])
diff --git a/testsuite/tests/rts/T12771/all.T b/testsuite/tests/rts/T12771/all.T
index 55ada90cb3..347c81b04e 100644
--- a/testsuite/tests/rts/T12771/all.T
+++ b/testsuite/tests/rts/T12771/all.T
@@ -1,4 +1,5 @@
test('T12771',
[extra_files(['foo.c', 'main.hs', 'foo_dll.c']),
+ expect_broken(18718),
unless(opsys('mingw32'), skip)],
makefile_test, ['T12771'])
diff --git a/testsuite/tests/rts/T13082/all.T b/testsuite/tests/rts/T13082/all.T
index 8219127051..70582b250c 100644
--- a/testsuite/tests/rts/T13082/all.T
+++ b/testsuite/tests/rts/T13082/all.T
@@ -16,6 +16,7 @@ def normalise_search_dirs (str):
#--------------------------------------
test('T13082_good',
[extra_files(['foo.c', 'main.hs', 'foo_dll.c']),
+ expect_broken(18718),
unless(opsys('mingw32'), skip)],
makefile_test, ['T13082_good'])
diff --git a/testsuite/tests/rts/T14611/all.T b/testsuite/tests/rts/T14611/all.T
index ef7873ce16..9077e0bbda 100644
--- a/testsuite/tests/rts/T14611/all.T
+++ b/testsuite/tests/rts/T14611/all.T
@@ -1,4 +1,5 @@
test('T14611',
[extra_files(['foo.c', 'main.hs', 'foo_dll.c']),
+ expect_broken(18718),
unless(opsys('mingw32'), skip)],
makefile_test, ['T14611'])