Commit 8a8a79aa authored by Andreas Klebinger's avatar Andreas Klebinger Committed by Ben Gamari

Update leftover reference to refer to [FunBind vs PatBind]

Reviewers: bgamari, mpickering

Reviewed By: mpickering

Subscribers: rwbarton, thomie, mpickering

Differential Revision: https://phabricator.haskell.org/D4205
parent 63e4ac37
......@@ -2206,7 +2206,7 @@ decl_no_th :: { LHsDecl GhcPs }
(ann, r) <- checkValDef empty SrcStrict e Nothing $3 ;
-- Depending upon what the pattern looks like we might get either
-- a FunBind or PatBind back from checkValDef. See Note
-- [Varieties of binding pattern matches]
-- [FunBind vs PatBind]
case r of {
(FunBind n _ _ _ _) ->
ams (L l ()) [mj AnnFunId n] >> return () ;
......@@ -2220,7 +2220,7 @@ decl_no_th :: { LHsDecl GhcPs }
let { l = comb2 $1 $> };
-- Depending upon what the pattern looks like we might get either
-- a FunBind or PatBind back from checkValDef. See Note
-- [Varieties of binding pattern matches]
-- [FunBind vs PatBind]
case r of {
(FunBind n _ _ _ _) ->
ams (L l ()) (mj AnnFunId n:(fst $2)) >> return () ;
......
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