diff options
| author | Andy Lester <andy@petdance.com> | 2007-05-02 19:45:54 -0500 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-05-03 09:30:08 +0000 |
| commit | c86f7df56cc91b3d77b0e549030650319f540a6b (patch) | |
| tree | 9ee270048ed4362bdf1c9a911cc97479f63250de /av.c | |
| parent | 08aeb9f701fa786d490e79e99ac2f9f9de229da3 (diff) | |
| download | perl-c86f7df56cc91b3d77b0e549030650319f540a6b.tar.gz | |
The revenge of the consts
Message-ID: <20070503054554.GA30975@petdance.com>
p4raw-id: //depot/perl@31123
Diffstat (limited to 'av.c')
| -rw-r--r-- | av.c | 5 |
1 files changed, 2 insertions, 3 deletions
@@ -656,10 +656,9 @@ Perl_av_unshift(pTHX_ register AV *av, register I32 num) } if (num) { register SV **ary; - I32 slide; - i = AvFILLp(av); + const I32 i = AvFILLp(av); /* Create extra elements */ - slide = i > 0 ? i : 0; + const I32 slide = i > 0 ? i : 0; num += slide; av_extend(av, i + num); AvFILLp(av) += num; |