[project @ 1996-01-11 14:06:51 by partain]
[ghc-hetmet.git] / ghc / compiler / main / ErrUtils.hi
1 {-# GHC_PRAGMA INTERFACE VERSION 5 #-}
2 interface ErrUtils where
3 import Bag(Bag)
4 import Pretty(PprStyle, PrettyRep)
5 import SrcLoc(SrcLoc)
6 type Error = PprStyle -> Int -> Bool -> PrettyRep
7 addErrLoc :: SrcLoc -> [Char] -> (PprStyle -> Int -> Bool -> PrettyRep) -> PprStyle -> Int -> Bool -> PrettyRep
8 addShortErrLocLine :: SrcLoc -> (PprStyle -> Int -> Bool -> PrettyRep) -> PprStyle -> Int -> Bool -> PrettyRep
9 dontAddErrLoc :: [Char] -> (PprStyle -> Int -> Bool -> PrettyRep) -> PprStyle -> Int -> Bool -> PrettyRep
10 pprBagOfErrors :: PprStyle -> Bag (PprStyle -> Int -> Bool -> PrettyRep) -> Int -> Bool -> PrettyRep
11