projects
/
ghc-hetmet.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
a4e1cab76bcc31cad6532610564bfaeb812eba2e
[ghc-hetmet.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 Message = SDoc
15
16
mkLocMessage :: SrcSpan -> Message -> Message
17
\end{code}