compiler/main/ErrUtils.hs-boot


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

module ErrUtils where

import Outputable (SDoc)
import SrcLoc (SrcSpan)

data Severity
  = SevOutput
  | SevFatal
  | SevInteractive
  | SevDump
  | SevInfo
  | SevWarning
  | SevError


type MsgDoc = SDoc

mkLocMessage :: Severity -> SrcSpan -> MsgDoc -> MsgDoc