diff options
| author | Andy Lester <andy@petdance.com> | 2006-02-24 08:54:35 -0600 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-02-27 11:06:30 +0000 |
| commit | b37c2d43c8bccbefe3985273e9661833102148d0 (patch) | |
| tree | b996c0398e5f83c4ed03e0b1144f10819ba27a27 /doop.c | |
| parent | ee94f8101362ee382e42ec2d404d79b0ab7d17ef (diff) | |
| download | perl-b37c2d43c8bccbefe3985273e9661833102148d0.tar.gz | |
Speedups and shrinkages of SvREFCNT_inc
Message-ID: <20060224205434.GA17867@petdance.com>
p4raw-id: //depot/perl@27334
Diffstat (limited to 'doop.c')
| -rw-r--r-- | doop.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1396,7 +1396,7 @@ Perl_do_kv(pTHX) if (LvTARG(TARG) != (SV*)keys) { if (LvTARG(TARG)) SvREFCNT_dec(LvTARG(TARG)); - LvTARG(TARG) = SvREFCNT_inc(keys); + LvTARG(TARG) = SvREFCNT_inc_simple(keys); } PUSHs(TARG); RETURN; |