summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndy Lester <andy@petdance.com>2006-04-30 08:24:14 -0500
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2006-05-02 08:50:05 +0000
commit74c765ebd9546713996cf9b987d7f80fa82a7674 (patch)
tree4535eb81b3382d2afe773e271cc6278912b4cc35
parenta25429c695343745462bc9b108964dcc3a8aae05 (diff)
downloadperl-74c765ebd9546713996cf9b987d7f80fa82a7674.tar.gz
Some more SvREFCNT_inc updates
Message-ID: <20060430182414.GA18094@petdance.com> p4raw-id: //depot/perl@28049
-rw-r--r--cop.h4
-rw-r--r--pp_ctl.c6
2 files changed, 5 insertions, 5 deletions
diff --git a/cop.h b/cop.h
index 5b6014b65e..ed6151e24e 100644
--- a/cop.h
+++ b/cop.h
@@ -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); \
}
diff --git a/pp_ctl.c b/pp_ctl.c
index 8ade9c3fb8..0aec4c5c53 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -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];