shithub: MicroHs

ref: cf0166d6f96c0980cf5c207866c730f6380f2788
dir: /lib/Control/Exception/Internal.hs-boot/

View raw version 
-- Copyright 2024 Lennart Augustsson
-- See LICENSE file for full license.
module Control.Exception.Internal(
  throw,
  Exception(..),
  SomeException,
  ) where
import Data.Char_Type
import Data.Typeable

throw :: forall e a. Exception e => e -> a

data SomeException

class (Typeable e, Show e) => Exception e where
    toException      :: e -> SomeException
    fromException    :: SomeException -> Maybe e
    displayException :: e -> String