diff options
author | Ben Gamari <ben@smart-cactus.org> | 2015-11-01 12:28:10 +0100 |
---|---|---|
committer | Ben Gamari <ben@smart-cactus.org> | 2015-11-01 13:42:51 +0100 |
commit | 677d7687f26dae9ac7c054c030d32f59a1460c72 (patch) | |
tree | f5ab4005d53ba0fb9499c686adb24aab474651ce /compiler/main/DynFlags.hs | |
parent | 5a4818039ff4419372744b395e6fc904b4bd9a1d (diff) | |
download | haskell-677d7687f26dae9ac7c054c030d32f59a1460c72.tar.gz |
DynFlags: -freverse-errors should be defFlag
This flag works under both GHC and GHCi, as pointed out on D1367. Thanks
to @thomie for pointing this out.
Diffstat (limited to 'compiler/main/DynFlags.hs')
-rw-r--r-- | compiler/main/DynFlags.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/main/DynFlags.hs b/compiler/main/DynFlags.hs index 0c1facc3ad..fb6265cdfb 100644 --- a/compiler/main/DynFlags.hs +++ b/compiler/main/DynFlags.hs @@ -2410,9 +2410,9 @@ dynamic_flags = [ deprecate "Use -fno-force-recomp instead")) , defGhcFlag "no-recomp" (NoArg (do setGeneralFlag Opt_ForceRecomp deprecate "Use -fforce-recomp instead")) - , defGhcFlag "freverse-errors" + , defFlag "freverse-errors" (noArg (\d -> d {reverseErrors = True} )) - , defGhcFlag "fno-reverse-errors" + , defFlag "fno-reverse-errors" (noArg (\d -> d {reverseErrors = False} )) ------ HsCpp opts --------------------------------------------------- |