haskell/yesod
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

properly configure programs

Browse Source
This commit is contained in:
Luite Stegeman 2012-04-04 03:08:58 +02:00
parent c097d289f8
commit 0b9edf6282
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
yesod/ghcwrapper.hs
View File

@ -12,7 +12,7 @@ import Distribution.Compiler (CompilerFlavor(..))
import Distribution.Simple.Configure (configCompiler)
import Distribution.Simple.Program (defaultProgramConfiguration, programPath, ghcProgram,
ldProgram, arProgram)
import Distribution.Simple.Program.Db (lookupProgram, configureProgram)
import Distribution.Simple.Program.Db (lookupProgram, configureAllKnownPrograms)
import Distribution.Simple.Program.Types (Program(..))
import Distribution.Verbosity (silent)
@ -42,7 +42,7 @@ outFile = "dist/ghcargs.txt"
runProgram :: Program -> [String] -> IO ExitCode
runProgram pgm args = do
(comp, pgmc) <- configCompiler (Just GHC) Nothing Nothing defaultProgramConfiguration silent
pgmc' <- configureProgram silent pgm pgmc
pgmc' <- configureAllKnownPrograms silent pgmc
case lookupProgram pgm pgmc' of
Nothing -> do
hPutStrLn stderr ("cannot find program '" ++ programName pgm ++ "'")