diff options
author | Andy Lester <andy@petdance.com> | 2006-04-30 08:24:14 -0500 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-05-02 08:50:05 +0000 |
commit | 74c765ebd9546713996cf9b987d7f80fa82a7674 (patch) | |
tree | 4535eb81b3382d2afe773e271cc6278912b4cc35 | |
parent | a25429c695343745462bc9b108964dcc3a8aae05 (diff) | |
download | perl-74c765ebd9546713996cf9b987d7f80fa82a7674.tar.gz |
Some more SvREFCNT_inc updates
Message-ID: <20060430182414.GA18094@petdance.com>
p4raw-id: //depot/perl@28049
-rw-r--r-- | cop.h | 4 | ||||
-rw-r--r-- | pp_ctl.c | 6 |
2 files changed, 5 insertions, 5 deletions
@@ -270,8 +270,8 @@ struct block_sub { cx->blk_sub.hasargs = hasargs; \ cx->blk_sub.retop = NULL; \ if (!CvDEPTH(cv)) { \ - SvREFCNT_inc_void(cv); \ - SvREFCNT_inc_void(cv); \ + SvREFCNT_inc_simple_void_NN(cv); \ + SvREFCNT_inc_simple_void_NN(cv); \ SAVEFREESV(cv); \ } @@ -2417,7 +2417,7 @@ PP(pp_goto) CvDEPTH(cv)++; if (CvDEPTH(cv) < 2) - SvREFCNT_inc_void_NN(cv); + SvREFCNT_inc_simple_void_NN(cv); else { if (CvDEPTH(cv) == 100 && ckWARN(WARN_RECURSION)) sub_crush_depth(cv); @@ -3189,7 +3189,7 @@ PP(pp_require) if (SvROK(arg) && (SvTYPE(SvRV(arg)) <= SVt_PVLV) && !isGV_with_GP(SvRV(arg))) { filter_cache = SvRV(arg); - SvREFCNT_inc_void_NN(filter_cache); + SvREFCNT_inc_simple_void_NN(filter_cache); if (i < count) { arg = SP[i++]; @@ -3221,7 +3221,7 @@ PP(pp_require) if (SvROK(arg) && SvTYPE(SvRV(arg)) == SVt_PVCV) { filter_sub = arg; - SvREFCNT_inc_void_NN(filter_sub); + SvREFCNT_inc_simple_void_NN(filter_sub); if (i < count) { filter_state = SP[i]; |