[project @ 2006-01-10 13:35:04 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