diff options
| author | Andy Lester <andy@petdance.com> | 2005-07-13 05:49:19 -0500 |
|---|---|---|
| committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2005-07-13 16:37:48 +0000 |
| commit | 46c461b51dd657dd9227e8d230ce0a737a33cb3e (patch) | |
| tree | ca0f3694daf76da19fba2b8c90d3aa186b9011f9 /pad.c | |
| parent | 858a90f980dd074da7b777d2a853a60c6e058f77 (diff) | |
| download | perl-46c461b51dd657dd9227e8d230ce0a737a33cb3e.tar.gz | |
More embed.fnc plowing
Message-ID: <20050713154919.GA24586@petdance.com>
p4raw-id: //depot/perl@25138
Diffstat (limited to 'pad.c')
| -rw-r--r-- | pad.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1539,7 +1539,7 @@ Perl_pad_fixup_inner_anons(pTHX_ PADLIST *padlist, CV *old_cv, CV *new_cv) if (namesv && namesv != &PL_sv_undef && *SvPVX_const(namesv) == '&') { - CV *innercv = (CV*)curpad[ix]; + CV * const innercv = (CV*)curpad[ix]; assert(CvWEAKOUTSIDE(innercv)); assert(CvOUTSIDE(innercv) == old_cv); CvOUTSIDE(innercv) = new_cv; |