summaryrefslogtreecommitdiff
path: root/regexec.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2008-01-09 11:40:12 +0000
committerNicholas Clark <nick@ccl4.org>2008-01-09 11:40:12 +0000
commitd2ece331daee8e28f4c669904c9cfa6dee30dd74 (patch)
tree7f064d79211e3de337c33b0ea9ecde602650818f /regexec.c
parentd0328fd7d629f8429b08eacaee4fd3cb902fdf5e (diff)
downloadperl-d2ece331daee8e28f4c669904c9cfa6dee30dd74.tar.gz
Change 32899 missed the other double-reference count.
p4raw-id: //depot/perl@32913
Diffstat (limited to 'regexec.c')
-rw-r--r--regexec.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/regexec.c b/regexec.c
index 9588cdfd12..9a41f202ca 100644
--- a/regexec.c
+++ b/regexec.c
@@ -2259,7 +2259,7 @@ S_regtry(pTHX_ regmatch_info *reginfo, char **startpos)
/* so we know which PL_regex_padav element is PL_reg_curpm
when clearing up in perl_destruct() */
SvFLAGS(repointer) |= SVf_BREAK;
- av_push(PL_regex_padav,SvREFCNT_inc_simple_NN(repointer));
+ av_push(PL_regex_padav, repointer);
PL_reg_curpm->op_pmoffset = av_len(PL_regex_padav);
PL_regex_pad = AvARRAY(PL_regex_padav);
}