This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Remove redundant comment.
[perl5.git] / regexec.c
index 1c20c54..8f8e4f0 100644 (file)
--- a/regexec.c
+++ b/regexec.c
@@ -4496,7 +4496,6 @@ S_regmatch(pTHX_ regmatch_info *reginfo, regnode *prog)
                ST.cp = regcppush(rex, 0);      /* Save *all* the positions. */
                REGCP_SET(ST.lastcp);
                
                ST.cp = regcppush(rex, 0);      /* Save *all* the positions. */
                REGCP_SET(ST.lastcp);
                
-               /* see regtry, specifically PL_reglast(?:close)?paren is a pointer! (i dont know why) :dmq */
                re->lastparen = 0;
                re->lastcloseparen = 0;
 
                re->lastparen = 0;
                re->lastcloseparen = 0;