From: simonpj <unknown>
Date: Thu, 13 Sep 2001 14:44:24 +0000 (+0000)
Subject: [project @ 2001-09-13 14:44:24 by simonpj]
X-Git-Tag: Approximately_9120_patches~985
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=4951988f99e951124eaca9f2b4b91f1edd6170fc;p=ghc-hetmet.git

[project @ 2001-09-13 14:44:24 by simonpj]
More error-message grammar
---

diff --git a/ghc/compiler/rename/RnEnv.lhs b/ghc/compiler/rename/RnEnv.lhs
index d5f39f0..ffcd10b 100644
--- a/ghc/compiler/rename/RnEnv.lhs
+++ b/ghc/compiler/rename/RnEnv.lhs
@@ -80,7 +80,7 @@ newTopBinder mod rdr_name loc
     	-- There should never be a qualified name in a binding position (except in instance decls)
 	-- The parser doesn't check this because the same parser parses instance decls
     (if isQual rdr_name then
-	qualNameErr (text "its declaration") (rdr_name,loc)
+	qualNameErr (text "In its declaration") (rdr_name,loc)
      else
 	returnRn ()
     )				`thenRn_`