blob: 86502c9ae677b0a1d81fe0d7ba65c1bd9b0ff898 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
|
{-# LANGUAGE Trustworthy #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-
This SOURCE-imported hs-boot module cuts a big dependency loop:
GHC.Exception
imports Data.Maybe
imports GHC.Base
imports GHC.Err
imports {-# SOURCE #-} GHC.Exception
More dramatically
GHC.Exception
imports Data.Typeable
imports Data.Typeable.Internal
imports GHC.Arr (fingerprint representation etc)
imports GHC.Real
imports {-# SOURCE #-} GHC.Exception
However, GHC.Exceptions loop-breaking exports are all nice,
well-behaved, non-bottom values. The clients use 'raise#'
to get a visibly-bottom value.
-}
module GHC.Exception
( module GHC.Exception.Type
, errorCallException
, errorCallWithCallStackException
) where
import {-# SOURCE #-} GHC.Exception.Type
import GHC.Types ( Char )
import GHC.Stack.Types ( CallStack )
errorCallException :: [Char] -> SomeException
errorCallWithCallStackException :: [Char] -> CallStack -> SomeException
|