From: Nicholas Clark Date: Wed, 9 Jan 2008 11:40:12 +0000 (+0000) Subject: Change 32899 missed the other double-reference count. X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d2ece331daee8e28f4c669904c9cfa6dee30dd74;p=p5sagit%2Fp5-mst-13.2.git Change 32899 missed the other double-reference count. p4raw-id: //depot/perl@32913 --- diff --git a/regexec.c b/regexec.c index 9588cdf..9a41f20 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); }