Commit 84782844 authored by Andrey Mokhov's avatar Andrey Mokhov
Browse files

Drop workaround for GHC bug #11331.

See #174.
parent 23d501a4
......@@ -14,7 +14,7 @@ compilePackage rs context @ (Context {..}) = do
let buildPath = targetPath stage package -/- "build"
buildPath <//> "*" <.> hisuf way %> \hi ->
if compileInterfaceFilesSeparately && not ("//HpcParser.*" ?== hi)
if compileInterfaceFilesSeparately
then do
(src, deps) <- dependencies buildPath $ hi -<.> osuf way
need $ src : deps
......@@ -37,7 +37,7 @@ compilePackage rs context @ (Context {..}) = do
need $ src : deps
build $ Target context (Gcc stage) [src] [obj]
else do
if compileInterfaceFilesSeparately && "//*.hs" ?== src && not ("//HpcParser.*" ?== src)
if compileInterfaceFilesSeparately && "//*.hs" ?== src
then need $ (obj -<.> hisuf way) : src : deps
else need $ src : deps
buildWithResources rs $ Target context (Ghc stage) [src] [obj]
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment