Skip to content
Snippets Groups Projects
Commit 96090a2e authored by Ian Lynagh's avatar Ian Lynagh
Browse files

Remove the Opt_Generics constructor

We no longer advertise that we support the Generics extension,
although we still do accept -XGenerics and -XNoGenerics flags
(but warn that we are ignoring them).

I also remove the even older -fgenerics and -fno-generics flags.
parent 7e662a7b
No related branches found
No related tags found
No related merge requests found
......@@ -387,7 +387,6 @@ data ExtensionFlag
| Opt_DeriveFoldable
| Opt_DeriveGeneric -- Allow deriving Generic/1
| Opt_DefaultSignatures -- Allow extra signatures for defmeths
| Opt_Generics -- Old generic classes, now deprecated
| Opt_TypeSynonymInstances
| Opt_FlexibleContexts
......@@ -1600,6 +1599,8 @@ dynamic_flags = [
++ map (mkFlag turnOff "XNo" unSetExtensionFlag) xFlags
++ map (mkFlag turnOn "X" setLanguage) languageFlags
++ map (mkFlag turnOn "X" setSafeHaskell) safeHaskellFlags
++ [ flagA "XGenerics" (NoArg (deprecate "it does nothing; look into -XDefaultSignatures and -XDeriveGeneric for generic programming support."))
, flagA "XNoGenerics" (NoArg (deprecate "it does nothing; look into -XDefaultSignatures and -XDeriveGeneric for generic programming support.")) ]
package_flags :: [Flag (CmdLineP DynFlags)]
package_flags = [
......@@ -1753,8 +1754,6 @@ fLangFlags = [
deprecatedForExtension "ForeignFunctionInterface" ),
( "arrows", AlwaysAllowed, Opt_Arrows,
deprecatedForExtension "Arrows" ),
( "generics", AlwaysAllowed, Opt_Generics,
deprecatedForExtension "Generics" ),
( "implicit-prelude", AlwaysAllowed, Opt_ImplicitPrelude,
deprecatedForExtension "ImplicitPrelude" ),
( "bang-patterns", AlwaysAllowed, Opt_BangPatterns,
......@@ -1841,8 +1840,6 @@ xFlags = [
( "ParallelArrays", AlwaysAllowed, Opt_ParallelArrays, nop ),
( "TemplateHaskell", NeverAllowed, Opt_TemplateHaskell, checkTemplateHaskellOk ),
( "QuasiQuotes", AlwaysAllowed, Opt_QuasiQuotes, nop ),
( "Generics", AlwaysAllowed, Opt_Generics,
\ _ -> deprecate "it does nothing; look into -XDefaultSignatures and -XDeriveGeneric for generic programming support." ),
( "ImplicitPrelude", AlwaysAllowed, Opt_ImplicitPrelude, nop ),
( "RecordWildCards", AlwaysAllowed, Opt_RecordWildCards, nop ),
( "NamedFieldPuns", AlwaysAllowed, Opt_RecordPuns, nop ),
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment