[project @ 2005-10-25 15:04:58 by simonmar]
[ghc-hetmet.git] / ghc / compiler / main / ErrUtils.hi-boot-6
1 module ErrUtils where
2
3 data Severity
4   = SevInfo
5   | SevWarning
6   | SevError
7   | SevFatal
8
9 type Message = Outputable.SDoc
10
11 mkLocMessage :: SrcLoc.SrcSpan -> Message -> Message