diff options
author | Herbert Valerio Riedel <hvr@gnu.org> | 2015-03-07 20:42:21 +0100 |
---|---|---|
committer | Herbert Valerio Riedel <hvr@gnu.org> | 2015-03-07 20:45:44 +0100 |
commit | 47b5b5c2b2c92ba091313c36489588edadceaa9d (patch) | |
tree | dbfae91089f8812d537bb75a48cb08e518274990 /libraries/base/Foreign | |
parent | 68d4f47212633d101c5f4963dbfccf0fb9a8580f (diff) | |
download | haskell-47b5b5c2b2c92ba091313c36489588edadceaa9d.tar.gz |
base: drop redundant Typeable derivings
Thanks to #9858 `Typeable` doesn't need to be explicitly derived anymore.
This also makes `AutoDeriveTypeable` redundant, as well as some imports of
`Typeable` (removal of whose may be beneficial to #9707). This commit
removes several such now redundant use-sites in `base`.
Reviewed By: austin, ekmett
Differential Revision: https://phabricator.haskell.org/D712
Diffstat (limited to 'libraries/base/Foreign')
-rw-r--r-- | libraries/base/Foreign/C/Types.hs | 3 | ||||
-rw-r--r-- | libraries/base/Foreign/Ptr.hs | 3 |
2 files changed, 2 insertions, 4 deletions
diff --git a/libraries/base/Foreign/C/Types.hs b/libraries/base/Foreign/C/Types.hs index abaf5c73d6..2b9939c6cc 100644 --- a/libraries/base/Foreign/C/Types.hs +++ b/libraries/base/Foreign/C/Types.hs @@ -1,6 +1,6 @@ {-# LANGUAGE Trustworthy #-} {-# LANGUAGE CPP, NoImplicitPrelude, MagicHash, GeneralizedNewtypeDeriving, - AutoDeriveTypeable, StandaloneDeriving #-} + StandaloneDeriving #-} {-# OPTIONS_GHC -fno-warn-unused-binds #-} -- XXX -fno-warn-unused-binds stops us warning about unused constructors, -- but really we should just remove them if we don't want them @@ -73,7 +73,6 @@ import Foreign.Storable import Data.Bits ( Bits(..), FiniteBits(..) ) import Data.Int ( Int8, Int16, Int32, Int64 ) import Data.Word ( Word8, Word16, Word32, Word64 ) -import Data.Typeable import GHC.Base import GHC.Float diff --git a/libraries/base/Foreign/Ptr.hs b/libraries/base/Foreign/Ptr.hs index e57da91a3c..efe580a70d 100644 --- a/libraries/base/Foreign/Ptr.hs +++ b/libraries/base/Foreign/Ptr.hs @@ -1,6 +1,6 @@ {-# LANGUAGE Trustworthy #-} {-# LANGUAGE CPP, NoImplicitPrelude, MagicHash, GeneralizedNewtypeDeriving, - AutoDeriveTypeable, StandaloneDeriving #-} + StandaloneDeriving #-} ----------------------------------------------------------------------------- -- | @@ -58,7 +58,6 @@ import GHC.Show import GHC.Enum import Data.Bits -import Data.Typeable import Foreign.Storable ( Storable(..) ) -- | Release the storage associated with the given 'FunPtr', which |