Permalink
Browse files

Follow changes in GHC

  • Loading branch information...
1 parent 78e3834 commit 2a72fa293a0d9a083c316dc3f5ca4ac8854b44c8 @igfoo igfoo committed Oct 8, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 src/Main.hs
View
@@ -317,7 +317,7 @@ withGhc libDir flags ghcActs = saveStaticFlagGlobals >>= \savedFlags -> do
ghcActs dynflags'''
`finally` restoreStaticFlagGlobals savedFlags
where
- parseGhcFlags :: Monad m => DynFlags -> [Located String]
+ parseGhcFlags :: MonadIO m => DynFlags -> [Located String]
-> [String] -> m DynFlags
parseGhcFlags dynflags flags_ origFlags = do
-- TODO: handle warnings?

0 comments on commit 2a72fa2

Please sign in to comment.