Commit 44fd16db authored by Andrey Mokhov's avatar Andrey Mokhov
Browse files

Don't run GHC -M concurrently with ghc-pkg.

See #205.
parent 116bf853
......@@ -10,7 +10,7 @@ import Development.Shake.Util (parseMakefile)
-- TODO: simplify handling of AutoApply.cmm
buildPackageDependencies :: Resources -> PartialTarget -> Rules ()
buildPackageDependencies _ target @ (PartialTarget stage pkg) =
buildPackageDependencies rs target @ (PartialTarget stage pkg) =
let path = targetPath stage pkg
buildPath = path -/- "build"
dropBuild = (pkgPath pkg ++) . drop (length buildPath)
......@@ -29,7 +29,8 @@ buildPackageDependencies _ target @ (PartialTarget stage pkg) =
need srcs
if srcs == []
then writeFileChanged out ""
else build $ fullTarget target (GhcM stage) srcs [out]
else buildWithResources [(resPackageDb rs, 1)] $
fullTarget target (GhcM stage) srcs [out]
removeFileIfExists $ out <.> "bak"
-- TODO: don't accumulate *.deps into .dependencies
......
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