diff options
author | David Mitchell <davem@iabyn.com> | 2015-12-18 22:07:25 +0000 |
---|---|---|
committer | David Mitchell <davem@iabyn.com> | 2016-02-03 09:18:36 +0000 |
commit | dbf345cf84e095f8e3db260cb18b8a3203c12745 (patch) | |
tree | b3504dd5a6e1a2b98a3900ec52a99fbd7322e8c0 /pp_ctl.c | |
parent | 9d9ff9a6d62c569a740c816d77c779f220205cb7 (diff) | |
download | perl-dbf345cf84e095f8e3db260cb18b8a3203c12745.tar.gz |
clarify code comment in pp_goto(()
Diffstat (limited to 'pp_ctl.c')
-rw-r--r-- | pp_ctl.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -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))[ |