shithub: MicroHs

ref: ba44b0a8e3c6b5d4720b322b68ace937fdab9a9e
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