From 84010979485cb1814ad1a9a309731f3d585206dd Mon Sep 17 00:00:00 2001 From: Manuel M T Chakravarty Date: Sun, 22 Oct 2006 17:12:12 +0000 Subject: [PATCH] Improve error messages for indexed types --- compiler/typecheck/TcTyClsDecls.lhs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/compiler/typecheck/TcTyClsDecls.lhs b/compiler/typecheck/TcTyClsDecls.lhs index 8ab053e..5574b76 100644 --- a/compiler/typecheck/TcTyClsDecls.lhs +++ b/compiler/typecheck/TcTyClsDecls.lhs @@ -1150,7 +1150,7 @@ newtypeFieldErr con_name n_flds badSigTyDecl tc_name = vcat [ ptext SLIT("Illegal kind signature") <+> quotes (ppr tc_name) - , nest 2 (parens $ ptext SLIT("Use -fglasgow-exts to allow indexed types")) ] + , nest 2 (parens $ ptext SLIT("Use -findexed-types to allow indexed types")) ] badKindSigCtxt tc_name = vcat [ ptext SLIT("Illegal context in kind signature") <+> @@ -1160,7 +1160,7 @@ badKindSigCtxt tc_name badIdxTyDecl tc_name = vcat [ ptext SLIT("Illegal indexed type instance for") <+> quotes (ppr tc_name) - , nest 2 (parens $ ptext SLIT("Use -fglasgow-exts to allow indexed types")) ] + , nest 2 (parens $ ptext SLIT("Use -findexed-types to allow indexed types")) ] badGadtIdxTyDecl tc_name = vcat [ ptext SLIT("Illegal generalised algebraic data declaration for") <+> -- 1.7.10.4