From: simonpj <unknown>
Date: Mon, 11 Oct 2004 12:45:51 +0000 (+0000)
Subject: [project @ 2004-10-11 12:45:51 by simonpj]
X-Git-Tag: Initial_conversion_from_CVS_complete~1510
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=3163b5473bbcdf31113e4d08b2a9c76aebc0c907

[project @ 2004-10-11 12:45:51 by simonpj]
Improve error message
---

diff --git a/ghc/compiler/rename/RnBinds.lhs b/ghc/compiler/rename/RnBinds.lhs
index 5720121..3d88d32 100644
--- a/ghc/compiler/rename/RnBinds.lhs
+++ b/ghc/compiler/rename/RnBinds.lhs
@@ -531,6 +531,6 @@ missingSigWarn var
     loc = nameSrcLoc var  -- TODO: make a proper span
 
 methodBindErr mbind
- =  hang (ptext SLIT("Can't handle multiple methods defined by one pattern binding"))
+ =  hang (ptext SLIT("Pattern bindings (except simple variables) not allowed in instance declarations"))
        4 (ppr mbind)
 \end{code}