summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2019-06-07 16:24:43 -0400
committerMarge Bot <ben+marge-bot@smart-cactus.org>2019-06-21 13:32:34 -0400
commit3967d13a2037d65d4f00fc43076b53339b475876 (patch)
treea3c962b6e601e7d424766102630cba45f5b1cad1
parent2eedb120a6fae214ca5b55658939a359bc55d19a (diff)
downloadhaskell-3967d13a2037d65d4f00fc43076b53339b475876.tar.gz
testsuite: Mark OldModLocation as broken on Windows
Strangely the path it emits contains duplicate path delimiters (#16772), ```patch --- ghc-api/downsweep/OldModLocation.run/OldModLocation.stderr.normalised 2019-06-04 14:40:26.326075000 +0000 +++ ghc-api/downsweep/OldModLocation.run/OldModLocation.run.stderr.normalised 2019-06-04 14:40:26.328029200 +0000 @@ -1 +1 @@ -[Just "A.hs",Just "mydir/B.hs"] +[Just "A.hs",Just "mydir//B.hs"] ```
-rw-r--r--testsuite/tests/ghc-api/downsweep/all.T1
1 files changed, 1 insertions, 0 deletions
diff --git a/testsuite/tests/ghc-api/downsweep/all.T b/testsuite/tests/ghc-api/downsweep/all.T
index 18ed26ac88..7882d77334 100644
--- a/testsuite/tests/ghc-api/downsweep/all.T
+++ b/testsuite/tests/ghc-api/downsweep/all.T
@@ -9,6 +9,7 @@ test('PartialDownsweep',
test('OldModLocation',
[ extra_run_opts('"' + config.libdir + '"')
+ , when(opsys('mingw32'), expect_broken(16772))
],
compile_and_run,
['-package ghc'])