Commit 6b29d930 authored by simonpj's avatar simonpj
Browse files

[project @ 2005-01-06 09:39:42 by simonpj]

Remove null where
parent 3f8685fa
......@@ -285,7 +285,6 @@ tcMatchPats pats tys body_ty thing_inside
= do { (pats', ex_tvs, res) <- tcPats LamPat pats tys thing_inside
; tcCheckExistentialPat pats' ex_tvs tys body_ty
; returnM (pats', res) }
where
tcCheckExistentialPat :: [LPat TcId] -- Patterns (just for error message)
-> [TcTyVar] -- Existentially quantified tyvars bound by pattern
......
Supports Markdown
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