removing the third argument from initializeFlagsWithCradle.

This commit is contained in:
Kazu Yamamoto
2014-04-28 13:00:25 +09:00
parent 117d01a52a
commit 000076223f
7 changed files with 10 additions and 10 deletions

View File

@@ -122,7 +122,7 @@ replace (x:xs) = x : replace xs
run :: Cradle -> Maybe FilePath -> Options -> Ghc a -> IO a
run cradle mlibdir opt body = G.runGhc mlibdir $ do
initializeFlagsWithCradle opt cradle []
initializeFlagsWithCradle opt cradle
dflags <- G.getSessionDynFlags
G.defaultCleanupHandler dflags body