diff options
author | Andy Lester <andy@petdance.com> | 2006-03-31 20:01:30 -0600 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-04-03 09:50:45 +0000 |
commit | f84c484e31ca71701038f389bc647f43cdbdfd43 (patch) | |
tree | 7d5147498290ccb0101249a59aaaaf5c11bd15ef /op.c | |
parent | 7f596f4c76b3e581f7af85bb1c7b292b73fc268c (diff) | |
download | perl-f84c484e31ca71701038f389bc647f43cdbdfd43.tar.gz |
SvREFCNT_inc tweaks
Message-ID: <20060401080130.GA19372@petdance.com>
p4raw-id: //depot/perl@27701
Diffstat (limited to 'op.c')
-rw-r--r-- | op.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -5121,7 +5121,7 @@ Perl_newATTRSUB(pTHX_ I32 floor, OP *o, OP *proto, OP *attrs, OP *block) } } if (const_sv) { - SvREFCNT_inc_void_NN(const_sv); + SvREFCNT_inc_simple_void_NN(const_sv); if (cv) { assert(!CvROOT(cv) && !CvCONST(cv)); sv_setpvn((SV*)cv, "", 0); /* prototype is "" */ |