From 577135bf2251cf0aecf07ebb4966659d3fcc62b5 Mon Sep 17 00:00:00 2001 From: Aaron Allen Date: Sat, 2 Oct 2021 14:52:43 -0500 Subject: Convert Diagnostics in GHC.Tc.Gen.Foreign Converts all uses of 'TcRnUnknownMessage' to proper diagnostics. --- compiler/GHC/Utils/Error.hs | 2 ++ 1 file changed, 2 insertions(+) (limited to 'compiler/GHC/Utils/Error.hs') diff --git a/compiler/GHC/Utils/Error.hs b/compiler/GHC/Utils/Error.hs index fb981452b6..7d2eb34c3b 100644 --- a/compiler/GHC/Utils/Error.hs +++ b/compiler/GHC/Utils/Error.hs @@ -1,4 +1,5 @@ {-# LANGUAGE BangPatterns #-} +{-# LANGUAGE DeriveFunctor #-} {-# LANGUAGE RankNTypes #-} {-# LANGUAGE ViewPatterns #-} @@ -194,6 +195,7 @@ mkPlainErrorMsgEnvelope locn msg = data Validity' a = IsValid -- ^ Everything is fine | NotValid a -- ^ A problem, and some indication of why + deriving Functor -- | Monomorphic version of @Validity'@ specialised for 'SDoc's. type Validity = Validity' SDoc -- cgit v1.2.1