[project @ 1997-08-02 21:43:35 by sof]

Improved err message

[project @ 1997-08-02 21:43:35 by sof]
Improved err message
63b9e02a · sof · 81cb7522 · 63b9e02a
Commit 63b9e02a authored 27 years ago by sof
--- a/ghc/compiler/typecheck/TcExpr.lhs
+++ b/ghc/compiler/typecheck/TcExpr.lhs
@@ -1032,7 +1032,7 @@ funAppCtxt fun arg_no arg sty
 	 4 (ppr sty arg)

 stmtCtxt ListComp stmt sty
-  = hang (ptext SLIT("In a list-comprehension qualifer:")) 
+  = hang (ptext SLIT("In a pattern guard/list-comprehension qualifier:")) 
         4 (ppr sty stmt)

 stmtCtxt DoStmt stmt sty