Implememt -fdefer-type-errors (Trac #5624)
[ghc.git] / compiler / main / ErrUtils.lhs-boot
1 \begin{code}
2 module ErrUtils where
3
4 import Outputable (SDoc)
5 import SrcLoc (SrcSpan)
6
7 data Severity
8   = SevOutput
9   | SevInfo
10   | SevWarning
11   | SevError
12   | SevFatal
13
14 type MsgDoc = SDoc
15
16 mkLocMessage :: Severity -> SrcSpan -> MsgDoc -> MsgDoc
17 \end{code}
18