[commit: ghc] master: Update leftover reference to refer to [FunBind vs PatBind] (8a8a79a)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/8a8a79aa722bf6cbe352bdf972f8d2d1726ee7dc/ghc

>---------------------------------------------------------------

commit 8a8a79aa722bf6cbe352bdf972f8d2d1726ee7dc
Author: klebinger.andreas at gmx.at <klebinger.andreas at gmx.at>
Date:   Tue Nov 21 18:25:57 2017 -0500

    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


>---------------------------------------------------------------

8a8a79aa722bf6cbe352bdf972f8d2d1726ee7dc
 compiler/parser/Parser.y | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/compiler/parser/Parser.y b/compiler/parser/Parser.y
index d4a2689..c60f517 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 () ;