projects
/
ghc-hetmet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
f7fd588
)
[project @ 1999-07-28 15:34:39 by simonpj]
author
simonpj
<unknown>
Wed, 28 Jul 1999 15:34:39 +0000
(15:34 +0000)
committer
simonpj
<unknown>
Wed, 28 Jul 1999 15:34:39 +0000
(15:34 +0000)
Improve error msg in tcPolyExpr; Simon pls merge into release
ghc/compiler/typecheck/TcExpr.lhs
patch
|
blob
|
history
diff --git
a/ghc/compiler/typecheck/TcExpr.lhs
b/ghc/compiler/typecheck/TcExpr.lhs
index
b9960e6
..
32a2eb2
100644
(file)
--- a/
ghc/compiler/typecheck/TcExpr.lhs
+++ b/
ghc/compiler/typecheck/TcExpr.lhs
@@
-143,7
+143,7
@@
tcPolyExpr arg expected_arg_ty
newDicts SignatureOrigin sig_theta `thenNF_Tc` \ (sig_dicts, dict_ids) ->
-- ToDo: better origin
tcSimplifyAndCheck
- (text "tcPolyExpr")
+ (text "the type signature of an expression")
(mkVarSet zonked_sig_tyvars)
sig_dicts lie_arg `thenTc` \ (free_insts, inst_binds) ->