diff --git a/cardano-prelude/src/Cardano/Prelude/Panic.hs b/cardano-prelude/src/Cardano/Prelude/Panic.hs index 4fde3a8..72025c5 100644 --- a/cardano-prelude/src/Cardano/Prelude/Panic.hs +++ b/cardano-prelude/src/Cardano/Prelude/Panic.hs @@ -10,12 +10,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