diff options
| author | Andy Lester <andy@petdance.com> | 2005-03-14 07:59:54 -0600 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-03-18 13:38:32 +0000 |
| commit | 7fc634935189abec1d574a9733c7093e5c9f2781 (patch) | |
| tree | 812ca27d3ab8a2b9edc12b87c730981d50858d59 /pad.c | |
| parent | ad5c2da20a409831a6acfe749626ce0396b43b3f (diff) | |
| download | perl-7fc634935189abec1d574a9733c7093e5c9f2781.tar.gz | |
More const parms
Message-ID: <20050314195954.GB7141@petdance.com>
p4raw-id: //depot/perl@24042
Diffstat (limited to 'pad.c')
| -rw-r--r-- | pad.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -259,7 +259,7 @@ Perl_pad_undef(pTHX_ CV* cv) if (namesv && namesv != &PL_sv_undef && *SvPVX(namesv) == '&') { - CV *innercv = (CV*)curpad[ix]; + CV * const innercv = (CV*)curpad[ix]; namepad[ix] = Nullsv; SvREFCNT_dec(namesv); @@ -276,7 +276,7 @@ Perl_pad_undef(pTHX_ CV* cv) CvWEAKOUTSIDE_off(innercv); CvOUTSIDE(innercv) = outercv; CvOUTSIDE_SEQ(innercv) = seq; - SvREFCNT_inc(outercv); + (void)SvREFCNT_inc(outercv); } else { CvOUTSIDE(innercv) = Nullcv; |