Skip to content

Commit bf9f25d

Browse files
committed
Remove un-needed derived Typeable instances
Typeable instances have been automatically derived since at least ghc-8.0.
1 parent 7124e87 commit bf9f25d

4 files changed

Lines changed: 8 additions & 8 deletions

File tree

src/Data/ByteString/Base64/Lazy/Type.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -22,7 +22,7 @@ import Data.Aeson
2222
import Data.Aeson.Types (FromJSONKeyFunction (..), toJSONKeyText)
2323
import Data.Binary (Binary (..))
2424
import Data.ByteString.Lazy (ByteString, pack, unpack)
25-
import Data.Data (Data, Typeable)
25+
import Data.Data (Data)
2626
import Data.Hashable (Hashable)
2727
import Data.Semigroup (Semigroup (..))
2828
import Data.String (IsString (..))
@@ -67,7 +67,7 @@ import Codec.Serialise (Serialise (..))
6767
-- "\"YWG/\""
6868
--
6969
newtype ByteString64 = BS64 ByteString
70-
deriving (Eq, Ord, Data, Typeable, Generic)
70+
deriving (Eq, Ord, Data, Generic)
7171

7272
instance Show ByteString64 where
7373
showsPrec d (BS64 bs) = showParen (d > 10) $ showString "mkBS64 " . showsPrec 11 bs

src/Data/ByteString/Base64/Type.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -22,7 +22,7 @@ import Data.Aeson
2222
import Data.Aeson.Types (FromJSONKeyFunction (..), toJSONKeyText)
2323
import Data.Binary (Binary (..))
2424
import Data.ByteString (ByteString, pack, unpack)
25-
import Data.Data (Data, Typeable)
25+
import Data.Data (Data)
2626
import Data.Hashable (Hashable)
2727
import Data.Semigroup (Semigroup (..))
2828
import Data.String (IsString (..))
@@ -71,7 +71,7 @@ import Web.HttpApiData (FromHttpApiData (..), ToHttpApiData (..))
7171
-- "\"YWG/\""
7272
--
7373
newtype ByteString64 = BS64 ByteString
74-
deriving (Eq, Ord, Data, Typeable, Generic)
74+
deriving (Eq, Ord, Data, Generic)
7575

7676
instance Show ByteString64 where
7777
showsPrec d (BS64 bs) = showParen (d > 10) $ showString "mkBS64 " . showsPrec 11 bs

src/Data/ByteString/Base64/URL/Lazy/Type.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -22,7 +22,7 @@ import Data.Aeson
2222
import Data.Aeson.Types (FromJSONKeyFunction (..), toJSONKeyText)
2323
import Data.Binary (Binary (..))
2424
import Data.ByteString.Lazy (ByteString, pack, unpack)
25-
import Data.Data (Data, Typeable)
25+
import Data.Data (Data)
2626
import Data.Hashable (Hashable)
2727
import Data.Semigroup (Semigroup (..))
2828
import Data.String (IsString (..))
@@ -67,7 +67,7 @@ import Codec.Serialise (Serialise (..))
6767
-- "\"YWG_\""
6868
--
6969
newtype ByteString64 = BS64 ByteString
70-
deriving (Eq, Ord, Data, Typeable, Generic)
70+
deriving (Eq, Ord, Data, Generic)
7171

7272
instance Show ByteString64 where
7373
showsPrec d (BS64 bs) = showParen (d > 10) $ showString "mkBS64 " . showsPrec 11 bs

src/Data/ByteString/Base64/URL/Type.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -22,7 +22,7 @@ import Data.Aeson
2222
import Data.Aeson.Types (FromJSONKeyFunction (..), toJSONKeyText)
2323
import Data.Binary (Binary (..))
2424
import Data.ByteString (ByteString, pack, unpack)
25-
import Data.Data (Data, Typeable)
25+
import Data.Data (Data)
2626
import Data.Hashable (Hashable)
2727
import Data.Semigroup (Semigroup (..))
2828
import Data.String (IsString (..))
@@ -71,7 +71,7 @@ import Web.HttpApiData (FromHttpApiData (..), ToHttpApiData (..))
7171
-- "\"YWG_\""
7272
--
7373
newtype ByteString64 = BS64 ByteString
74-
deriving (Eq, Ord, Data, Typeable, Generic)
74+
deriving (Eq, Ord, Data, Generic)
7575

7676
instance Show ByteString64 where
7777
showsPrec d (BS64 bs) = showParen (d > 10) $ showString "mkBS64 " . showsPrec 11 bs

0 commit comments

Comments
 (0)