Remove all derived Typeable instances

IntersectMBO · Jan 13, 2025 · c5a44be · c5a44be
1 parent 4e0a023
commit c5a44be
Showing 1 changed file with 1 addition and 3 deletions.
diff --git a/cardano-prelude/src/Cardano/Prelude/Panic.hs b/cardano-prelude/src/Cardano/Prelude/Panic.hs
@@ -1,5 +1,4 @@
 {-# LANGUAGE ConstraintKinds #-}
-{-# LANGUAGE DeriveDataTypeable #-}
 {-# LANGUAGE Safe #-}
 
 -- This module cargo-culted from `Protolude`.
@@ -10,12 +9,11 @@ module Cardano.Prelude.Panic (
 
 import Control.Exception (Exception, throw)
 import Data.Text (Text)
-import Data.Typeable (Typeable)
 import GHC.Stack (HasCallStack)
 
 -- | Uncatchable exceptions thrown and never caught.
 newtype FatalError = FatalError { fatalErrorMessage :: Text }
-  deriving (Show, Typeable)
+  deriving Show
 
 instance Exception FatalError