diff options
Diffstat (limited to 'compiler/main/Main.hs')
| -rw-r--r-- | compiler/main/Main.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/main/Main.hs b/compiler/main/Main.hs index 57cf28ea4e..de72089b1c 100644 --- a/compiler/main/Main.hs +++ b/compiler/main/Main.hs @@ -363,11 +363,11 @@ parseModeFlags args = do throwDyn (UsageError (unlines errs)) return (mode, flags ++ leftover) -type ModeM a = CmdLineP (CmdLineMode, String, [String]) a +type ModeM = CmdLineP (CmdLineMode, String, [String]) -- mode flags sometimes give rise to new DynFlags (eg. -C, see below) -- so we collect the new ones and return them. -mode_flags :: [Flag (CmdLineP (CmdLineMode, String, [String]))] +mode_flags :: [Flag ModeM] mode_flags = [ ------- help / version ---------------------------------------------- Flag "?" (PassFlag (setMode ShowUsage)) |