diff options
| author | Andy Lester <andy@petdance.com> | 2005-11-04 09:12:56 -0600 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-11-07 10:24:54 +0000 |
| commit | 7452cf6af2e38d62832bbd8762076e54fa12a70f (patch) | |
| tree | 0524ba69bff9e7ad05914f72650259df8302cee6 /scope.c | |
| parent | 21401c75f1c38e127fa870b81fca15879c466865 (diff) | |
| download | perl-7452cf6af2e38d62832bbd8762076e54fa12a70f.tar.gz | |
Consting and localizing: Part LXVIII
Message-ID: <20051104211256.GA12651@petdance.com>
p4raw-id: //depot/perl@26028
Diffstat (limited to 'scope.c')
| -rw-r--r-- | scope.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -169,7 +169,7 @@ S_save_scalar_at(pTHX_ SV **sptr) SV * Perl_save_scalar(pTHX_ GV *gv) { - SV **sptr = &GvSV(gv); + SV ** const sptr = &GvSV(gv); PL_localizing = 1; SvGETMAGIC(*sptr); PL_localizing = 0; @@ -963,8 +963,8 @@ Perl_leave_scope(pTHX_ I32 base) case SAVEt_SAVESWITCHSTACK: { dSP; - AV* t = (AV*)SSPOPPTR; - AV* f = (AV*)SSPOPPTR; + AV* const t = (AV*)SSPOPPTR; + AV* const f = (AV*)SSPOPPTR; SWITCHSTACK(t,f); PL_curstackinfo->si_stack = f; } |