X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Ftypecheck%2FTcTyClsDecls.lhs;h=5574b76071343adf21b8a7751187ccfd06313097;hb=84923cc7de2a93c22a2f72daf9ac863959efae13;hp=8ab053ecb249029c657fbbdb993b28b8baa4e787;hpb=ab22f4e6456820c1b5169d75f5975a94e61f54ce;p=ghc-hetmet.git

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") <+>