{-# OPTIONS_GHC -fno-warn-orphans #-} -- instance Diagnostic TcRnMessage module GHC.Tc.Errors.Ppr where import GHC.Tc.Errors.Types import GHC.Types.Error instance Diagnostic TcRnMessage where diagnosticMessage (TcRnUnknownMessage m) = diagnosticMessage m diagnosticReason (TcRnUnknownMessage m) = diagnosticReason m