From 615a5546467c7864c765adf40706f23be3fa28b6 Mon Sep 17 00:00:00 2001
From: simonpj <unknown>
Date: Mon, 19 Nov 2001 16:33:17 +0000
Subject: [PATCH] [project @ 2001-11-19 16:33:17 by simonpj] Improve error msg

---
 ghc/compiler/typecheck/TcMType.lhs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ghc/compiler/typecheck/TcMType.lhs b/ghc/compiler/typecheck/TcMType.lhs
index d296057..e5201a9 100644
--- a/ghc/compiler/typecheck/TcMType.lhs
+++ b/ghc/compiler/typecheck/TcMType.lhs
@@ -795,7 +795,7 @@ checkAmbiguity forall_tyvars theta tau
 ambigErr pred
   = sep [ptext SLIT("Ambiguous constraint") <+> quotes (pprPred pred),
 	 nest 4 (ptext SLIT("At least one of the forall'd type variables mentioned by the constraint") $$
-		 ptext SLIT("must be reachable from the type after the =>"))]
+		 ptext SLIT("must be reachable from the type after the '=>'"))]
 
 
 freeErr pred
-- 
1.7.10.4