From: simonmar <unknown>
Date: Thu, 10 May 2001 09:00:28 +0000 (+0000)
Subject: [project @ 2001-05-10 09:00:28 by simonmar]
X-Git-Tag: Approximately_9120_patches~1962
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=8ab118717df9419ce3e6a890e75c3f088d6fc974;p=ghc-hetmet.git

[project @ 2001-05-10 09:00:28 by simonmar]
typo in error msg, pointed out by Alastair Reid.
---

diff --git a/ghc/compiler/hsSyn/HsExpr.lhs b/ghc/compiler/hsSyn/HsExpr.lhs
index c5cd5b5..cf7a863 100644
--- a/ghc/compiler/hsSyn/HsExpr.lhs
+++ b/ghc/compiler/hsSyn/HsExpr.lhs
@@ -686,5 +686,5 @@ pprMatchContext RecUpd	     = ptext SLIT("In a record-update construct")
 pprMatchContext PatBindRhs   = ptext SLIT("In a pattern binding")
 pprMatchContext LambdaExpr   = ptext SLIT("In a lambda abstraction")
 pprMatchContext DoExpr       = ptext SLIT("In a 'do' expression pattern binding")
-pprMatchContext ListComp     = ptext SLIT("In a 'list comprension' pattern binding")
+pprMatchContext ListComp     = ptext SLIT("In a 'list comprehension' pattern binding")
 \end{code}