diff options
| author | Ian Lynagh <igloo@earth.li> | 2010-10-06 12:44:13 +0000 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2010-10-06 12:44:13 +0000 |
| commit | 781fd68db0abe2ebca2481a149442ee3ff8d99b7 (patch) | |
| tree | a6ca69412f209aa05c6f37fc4b36b420173a3681 /compiler | |
| parent | dfef22cd11cf08e9440af75a6abe2979562db9f2 (diff) | |
| download | haskell-781fd68db0abe2ebca2481a149442ee3ff8d99b7.tar.gz | |
Deprecate -fglasgow-exts
Diffstat (limited to 'compiler')
| -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 f5cfe74625..056f36757b 100644 --- a/compiler/main/DynFlags.hs +++ b/compiler/main/DynFlags.hs @@ -1356,8 +1356,8 @@ dynamic_flags = [ setTarget HscNothing)) , Flag "fbyte-code" (NoArg (setTarget HscInterpreted)) , Flag "fobject-code" (NoArg (setTarget defaultHscTarget)) - , Flag "fglasgow-exts" (NoArg enableGlasgowExts) - , Flag "fno-glasgow-exts" (NoArg disableGlasgowExts) + , Flag "fglasgow-exts" (NoArg (enableGlasgowExts >> deprecate "Use individual extensions instead")) + , Flag "fno-glasgow-exts" (NoArg (disableGlasgowExts >> deprecate "Use individual extensions instead")) ] ++ map (mkFlag True "f" setDynFlag ) fFlags ++ map (mkFlag False "fno-" unSetDynFlag) fFlags |