compiler/main/ErrUtils.lhs-boot


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

\begin{code}
module ErrUtils where

import Outputable (SDoc)
import SrcLoc (SrcSpan)

data Severity
  = SevInfo
  | SevWarning
  | SevError
  | SevFatal

type Message = SDoc

mkLocMessage :: SrcSpan -> Message -> Message
\end{code}