diff options
author | David Mitchell <davem@iabyn.com> | 2015-12-18 22:09:58 +0000 |
---|---|---|
committer | David Mitchell <davem@iabyn.com> | 2016-02-03 09:18:36 +0000 |
commit | 6fb05a88b585ff8c2ecf0a3f089acceca1bae5b7 (patch) | |
tree | 0bde80eadc627bdb1e327670e4307cf2930914e0 /pp_ctl.c | |
parent | dbf345cf84e095f8e3db260cb18b8a3203c12745 (diff) | |
download | perl-6fb05a88b585ff8c2ecf0a3f089acceca1bae5b7.tar.gz |
give POP_SAVEARRAY() macro a cx arg
rather than just assuming that there's a 'cx' var in scope
Diffstat (limited to 'pp_ctl.c')
-rw-r--r-- | pp_ctl.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -2796,7 +2796,7 @@ PP(pp_goto) SP += items; if (CxTYPE(cx) == CXt_SUB && CxHASARGS(cx)) { /* Restore old @_ */ - POP_SAVEARRAY(); + POP_SAVEARRAY(cx); } retop = cx->blk_sub.retop; |