summaryrefslogtreecommitdiff
path: root/pp_ctl.c
diff options
context:
space:
mode:
authorDavid Mitchell <davem@iabyn.com>2015-12-18 22:07:25 +0000
committerDavid Mitchell <davem@iabyn.com>2016-02-03 09:18:36 +0000
commitdbf345cf84e095f8e3db260cb18b8a3203c12745 (patch)
treeb3504dd5a6e1a2b98a3900ec52a99fbd7322e8c0 /pp_ctl.c
parent9d9ff9a6d62c569a740c816d77c779f220205cb7 (diff)
downloadperl-dbf345cf84e095f8e3db260cb18b8a3203c12745.tar.gz
clarify code comment in pp_goto(()
Diffstat (limited to 'pp_ctl.c')
-rw-r--r--pp_ctl.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/pp_ctl.c b/pp_ctl.c
index 9e7888b99f..735969ce92 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -2721,7 +2721,7 @@ PP(pp_goto)
CX_LEAVE_SCOPE(cx);
if (CxTYPE(cx) == CXt_SUB && CxHASARGS(cx)) {
- /* this is POPSUB_ARGS() with minor variations */
+ /* this is part of POPSUB_ARGS() */
AV* av = MUTABLE_AV(PAD_SVl(0));
assert(AvARRAY(MUTABLE_AV(
PadlistARRAY(CvPADLIST(cx->blk_sub.cv))[