aboutsummaryrefslogtreecommitdiff
path: root/html-test/Main.hs
diff options
context:
space:
mode:
authorAlexander Biehl <alexbiehl@gmail.com>2018-06-14 15:28:52 +0200
committerGitHub <noreply@github.com>2018-06-14 15:28:52 +0200
commit6247ec8b5a5bc8145ce851dce11eb617a380381c (patch)
tree7856c0dd1ddd0c1f3eef0422b0cd8e8a5a6b71cb /html-test/Main.hs
parent9a7f539d0c20654ff394f2ff99836412a6844df1 (diff)
parent095fa970b32c818ed4c06cefc00ba98aaff756fa (diff)
Merge pull request #857 from sjakobi/ghc-head-update-3
Update ghc-head
Diffstat (limited to 'html-test/Main.hs')
-rwxr-xr-xhtml-test/Main.hs15
1 files changed, 15 insertions, 0 deletions
diff --git a/html-test/Main.hs b/html-test/Main.hs
index 67dbeec6..d65a5087 100755
--- a/html-test/Main.hs
+++ b/html-test/Main.hs
@@ -47,7 +47,22 @@ stripIfRequired mdl =
preserveLinksModules :: [String]
preserveLinksModules = ["Bug253"]
+ingoredTests :: [FilePath]
+ingoredTests =
+ [
+ -- Currently some declarations are exported twice
+ -- we need a reliable way to deduplicate here.
+ -- Happens since PR #688.
+ "B"
+
+ -- ignore-exports flag broke with PR #688. We use
+ -- the Avails calculated by GHC now. Probably
+ -- requires a change to GHC to "ignore" a modules
+ -- export list reliably.
+ , "IgnoreExports"
+ ]
checkIgnore :: FilePath -> Bool
+checkIgnore file | takeBaseName file `elem` ingoredTests = True
checkIgnore file@(c:_) | takeExtension file == ".html" && isUpper c = False
checkIgnore _ = True