diff options
| author | Ian Lynagh <ian@well-typed.com> | 2012-10-08 21:59:46 +0100 |
|---|---|---|
| committer | Ian Lynagh <ian@well-typed.com> | 2012-10-08 21:59:46 +0100 |
| commit | 2a72fa293a0d9a083c316dc3f5ca4ac8854b44c8 (patch) | |
| tree | 7dd193fb5310f46738e542b5b722baa10f103795 | |
| parent | 78e3834448f02e990ca5dac1bbbb20eaa68eaaab (diff) | |
Follow changes in GHC
| -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? |