diff options
| -rw-r--r-- | src/Main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Main.hs b/src/Main.hs index dedc23dc..94cbad02 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -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? |