addLocWarn :: Located e -> (e -> Message) -> TcRn ()
addLocWarn (L loc e) fn = addReportAt loc (fn e)
checkErr :: Bool -> Message -> TcRn ()
-- Add the error if the bool is False
addLocWarn :: Located e -> (e -> Message) -> TcRn ()
addLocWarn (L loc e) fn = addReportAt loc (fn e)
checkErr :: Bool -> Message -> TcRn ()
-- Add the error if the bool is False