Skip to content
Snippets Groups Projects
Commit 63b9e02a authored by sof's avatar sof
Browse files

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

Improved err message
parent 81cb7522
No related merge requests found
Hide whitespace changes
Inline Side-by-side
ghc/compiler/typecheck/TcExpr.lhs
+ 1
− 1
View file @ 63b9e02a
...@@ -1032,7 +1032,7 @@ funAppCtxt fun arg_no arg sty ...@@ -1032,7 +1032,7 @@ funAppCtxt fun arg_no arg sty
4 (ppr sty arg) 4 (ppr sty arg)
stmtCtxt ListComp stmt sty 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) 4 (ppr sty stmt)
stmtCtxt DoStmt stmt sty stmtCtxt DoStmt stmt sty
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment