diff options
author | Andy Lester <andy@petdance.com> | 2005-07-18 05:37:38 -0500 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-07-18 15:23:38 +0000 |
commit | 9a957fbc017c803266bc4e3766dfcbfb58cfa99b (patch) | |
tree | beed88f144e14ca4175e374522d11a7175c151eb /pad.c | |
parent | 8896765ab803e8ecde87ca250efb892518f0df16 (diff) | |
download | perl-9a957fbc017c803266bc4e3766dfcbfb58cfa99b.tar.gz |
The continuing plod through embed.fnc
Message-ID: <20050718153738.GB20193@petdance.com>
p4raw-id: //depot/perl@25172
Diffstat (limited to 'pad.c')
-rw-r--r-- | pad.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1505,7 +1505,7 @@ Perl_cv_clone(pTHX_ CV *proto) SV* const_sv = op_const_sv(CvSTART(cv), cv); if (const_sv) { SvREFCNT_dec(cv); - cv = newCONSTSUB(CvSTASH(proto), 0, const_sv); + cv = newCONSTSUB(CvSTASH(proto), Nullch, const_sv); } else { CvCONST_off(cv); |