diff options
| author | Andy Lester <andy@petdance.com> | 2005-10-04 10:16:05 -0500 |
|---|---|---|
| committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2005-10-05 15:34:09 +0000 |
| commit | 44f8325f4c9b3aaf24b47f4da7dce3e8170dcf42 (patch) | |
| tree | 79ae96444551bc3a112d7601282f544236b6cdfb /pad.c | |
| parent | 5f0135ebccd6cdb2441aabb64baa39aea87199d3 (diff) | |
| download | perl-44f8325f4c9b3aaf24b47f4da7dce3e8170dcf42.tar.gz | |
Re: [PATCH] Random constings and printf cleanup
Message-ID: <20051004201605.GA31682@petdance.com>
p4raw-id: //depot/perl@25693
Diffstat (limited to 'pad.c')
| -rw-r--r-- | pad.c | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -1566,12 +1566,12 @@ Perl_pad_push(pTHX_ PADLIST *padlist, int depth) return; { - SV** svp = AvARRAY(padlist); - AV *newpad = newAV(); - SV **oldpad = AvARRAY(svp[depth-1]); + SV** const svp = AvARRAY(padlist); + AV* const newpad = newAV(); + SV** const oldpad = AvARRAY(svp[depth-1]); I32 ix = AvFILLp((AV*)svp[1]); const I32 names_fill = AvFILLp((AV*)svp[0]); - SV** names = AvARRAY(svp[0]); + SV** const names = AvARRAY(svp[0]); AV *av; for ( ;ix > 0; ix--) { |