summaryrefslogtreecommitdiff
path: root/compiler/GHC/Types/Error.hs
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/GHC/Types/Error.hs')
-rw-r--r--compiler/GHC/Types/Error.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/GHC/Types/Error.hs b/compiler/GHC/Types/Error.hs
index eec75c1ba5..a5dbe16ce3 100644
--- a/compiler/GHC/Types/Error.hs
+++ b/compiler/GHC/Types/Error.hs
@@ -260,8 +260,8 @@ fromGhcDiagnosticCode mk_ghc_dc =
where
check_code :: GhcDiagnosticCode -> GhcDiagnosticCode
check_code ghc_code =
-{- assertPpr (ghc_code `elem` allUsedDiagnosticCodes)
- (text "Unknown diagnostic code:" <+> ppr ghc_code) $ -}
+ assertPpr (ghc_code `elem` allUsedDiagnosticCodes)
+ (text "Unknown diagnostic code:" <+> ppr ghc_code) $
ghc_code
-- | A class identifying diagnostic message types within GHC.