Commit dec0b8b0 authored by simonpj's avatar simonpj
Browse files

[project @ 2000-12-18 14:54:08 by simonpj]

Fix error message
parent 376b25a5
......@@ -174,7 +174,7 @@ rnMatch match@(Match _ pats maybe_rhs_sig grhss)
tyvars_in_pats = extractPatsTyVars pats
forall_tyvars = filter (not . (`elemFM` name_env)) tyvars_in_sigs
doc_sig = text "a pattern type-signature"
doc_pats = text "in a pattern match"
doc_pats = text "a pattern match"
in
bindNakedTyVarsFVRn doc_sig forall_tyvars $ \ sig_tyvars ->
......
Markdown is supported
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