diff options
author | klebinger.andreas@gmx.at <klebinger.andreas@gmx.at> | 2017-11-21 18:25:57 -0500 |
---|---|---|
committer | Ben Gamari <ben@smart-cactus.org> | 2017-11-21 21:11:16 -0500 |
commit | 8a8a79aa722bf6cbe352bdf972f8d2d1726ee7dc (patch) | |
tree | ab3f04795c7f8b843288ff8beaf872d36a528d1b /compiler | |
parent | 63e4ac37d7268e063cb6adcea89e1e8716c5de89 (diff) | |
download | haskell-8a8a79aa722bf6cbe352bdf972f8d2d1726ee7dc.tar.gz |
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
Diffstat (limited to 'compiler')
-rw-r--r-- | compiler/parser/Parser.y | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/parser/Parser.y b/compiler/parser/Parser.y index d4a26895d6..c60f51722f 100644 --- a/compiler/parser/Parser.y +++ b/compiler/parser/Parser.y @@ -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 () ; |