Fix -Wderiving-typeable

Bodigrim · Sep 26, 2024 · 712930c · 712930c
1 parent 1a3cfa4
commit 712930c
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 5 deletions.
diff --git a/src/Data/Bit/F2Poly.hs b/src/Data/Bit/F2Poly.hs
@@ -36,7 +36,6 @@ import Data.Bits
 import Data.Char
 import Data.Coerce
 import Data.Primitive.ByteArray
-import Data.Typeable
 import qualified Data.Vector.Primitive as P
 import qualified Data.Vector.Unboxed as U
 import qualified Data.Vector.Unboxed.Mutable as MU
@@ -77,7 +76,7 @@ newtype F2Poly = F2Poly {
   --
   -- @since 1.0.1.0
   }
-  deriving (Eq, Ord, Typeable, Generic, NFData)
+  deriving (Eq, Ord, Generic, NFData)
 
 -- | Make an 'F2Poly' from a list of coefficients
 -- (first element corresponds to a constant term).

diff --git a/src/Data/Bit/Internal.hs b/src/Data/Bit/Internal.hs
@@ -41,7 +41,6 @@ import Data.Bits
 import Data.Bit.Utils
 import Data.Primitive.ByteArray
 import Data.Ratio
-import Data.Typeable
 import qualified Data.Vector.Generic as V
 import qualified Data.Vector.Generic.Mutable as MV
 import qualified Data.Vector.Unboxed as U
@@ -65,7 +64,7 @@ newtype Bit = Bit {
   } deriving
   (Bounded, Enum, Eq, Ord
   , FiniteBits -- ^ @since 0.2.0.0
-  , Bits, Typeable
+  , Bits
   , Generic    -- ^ @since 1.0.1.0
   , NFData     -- ^ @since 1.0.1.0
   )
@@ -83,7 +82,7 @@ newtype Bit = Bit {
   } deriving
   (Bounded, Enum, Eq, Ord
   , FiniteBits -- ^ @since 0.2.0.0
-  , Bits, Typeable
+  , Bits
   , Generic    -- ^ @since 1.0.1.0
   , NFData     -- ^ @since 1.0.1.0
   )