diff options
author | David Mitchell <davem@iabyn.com> | 2015-12-26 11:52:33 +0000 |
---|---|---|
committer | David Mitchell <davem@iabyn.com> | 2016-02-03 09:19:18 +0000 |
commit | 40ba680a17dc8d6a78964c98884ac1cb18695d8a (patch) | |
tree | 10e8255c9cc84dae2fabf155921bffe061bd7c79 /pp_ctl.c | |
parent | fd9b7244731b18bb1794c4ff6540e4040e51879b (diff) | |
download | perl-40ba680a17dc8d6a78964c98884ac1cb18695d8a.tar.gz |
PUSHSUB: don't use implicit args
Make cv and hasargs explicit parameters of PUSHSUB(), rather than just
assuming that there are such vars in scope.
Diffstat (limited to 'pp_ctl.c')
-rw-r--r-- | pp_ctl.c | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -2013,9 +2013,8 @@ PP(pp_dbstate) return NORMAL; } else { - U8 hasargs = 0; PUSHBLOCK(cx, CXt_SUB, gimme, SP, PL_savestack_ix); - PUSHSUB_DB(cx); + PUSHSUB_DB(cx, cv, 0); cx->blk_sub.retop = PL_op->op_next; SAVEI32(PL_debug); |