Commit e3e12b2a authored by simonpj@microsoft.com's avatar simonpj@microsoft.com

Remove use of (now-gone) VarPatOut

parent faca1a62
......@@ -280,7 +280,6 @@ boundThings modname lbinding =
in case unLoc lpat of
WildPat _ -> tl
VarPat name -> lid name : tl
VarPatOut name _ -> lid name : tl -- XXX need help here
LazyPat p -> patThings p tl
AsPat id p -> patThings p (thing id : tl)
ParPat p -> patThings p tl
......
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