Skip to content

Commit

Permalink
Always pass -hide-all-packages to ghc.
Browse files Browse the repository at this point in the history
Makes error messages more obvious.
  • Loading branch information
23Skidoo committed Oct 30, 2011
1 parent 23dbac9 commit dd864db
Show file tree
Hide file tree
Showing 3 changed files with 6 additions and 3 deletions.
5 changes: 3 additions & 2 deletions GHC/ParMake/Engine.hs
Expand Up @@ -72,8 +72,9 @@ workerThread outHooks verbosity totNum ghcArgs wch cch

runGHC :: [String] -> IO ExitCode
runGHC args =
do debug outHooks verbosity $ show ("ghc":args)
runProcess outHooks Nothing "ghc" args
do let args' = "-hide-all-packages":args
debug outHooks verbosity $ show ("ghc":args')
runProcess outHooks Nothing "ghc" args'

onSuccess :: ExitCode -> ControlMessage -> ControlMessage -> IO ()
onSuccess exitCode msgSucc msgFail =
Expand Down
2 changes: 2 additions & 0 deletions README
Expand Up @@ -27,5 +27,7 @@ Known limitations:

* Building libraries is not yet supported.
* Build fails when -odir != -hidir.
* Unlike 'ghc --make', ghc-parmake can't figure out package dependencies automatically,
so you'll need to specify them by hand with the -package option.
* -hisuf/-osuf are not supported (needed for building libs for profiling).
* Tested only on Linux.
2 changes: 1 addition & 1 deletion tests/Tests.hs
Expand Up @@ -108,7 +108,7 @@ mkTestCase dirName numJobs =
curDir <- getCurrentDirectory
createDirectory oDir
exitCode <- getExitCode (curDir </> makeProgram)
[ "Main.hs", "-j", show numJobs
[ "Main.hs", "-package", "base", "-j", show numJobs
, "-odir", oDirName, "-hidir", oDirName] testDir
assertEqual "ghc-parmake invocation failed!" ExitSuccess exitCode
removeDirectoryRecursive oDir
Expand Down

0 comments on commit dd864db

Please sign in to comment.