diff options
author | Andy Lester <andy@petdance.com> | 2005-06-22 04:41:00 -0500 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-06-23 08:39:44 +0000 |
commit | 1b6737cc10a847650f574c35f419cbd680a5a5ef (patch) | |
tree | b96d16d5faf3db00f9c9488a814c8a8d6a217387 /pp.h | |
parent | 89e33a0587050e7ef2e88ba45c87444d8506f821 (diff) | |
download | perl-1b6737cc10a847650f574c35f419cbd680a5a5ef.tar.gz |
Const Boy II: The Localizing
Message-ID: <20050622144059.GA19598@petdance.com>
p4raw-id: //depot/perl@24945
Diffstat (limited to 'pp.h')
-rw-r--r-- | pp.h | 16 |
1 files changed, 13 insertions, 3 deletions
@@ -283,8 +283,8 @@ and C<PUSHu>. } } STMT_END /* Same thing, but update mark register too. */ -#define MEXTEND(p,n) STMT_START {if (PL_stack_max - p < (int)(n)) { \ - int markoff = mark - PL_stack_base; \ +#define MEXTEND(p,n) STMT_START {if (PL_stack_max - p < (int)(n)) { \ + const int markoff = mark - PL_stack_base; \ sp = stack_grow(sp,p,(int) (n)); \ mark = PL_stack_base + markoff; \ } } STMT_END @@ -401,7 +401,7 @@ and C<PUSHu>. #define tryAMAGICbinW(meth,assign,set) STMT_START { \ if (PL_amagic_generation) { \ SV* tmpsv; \ - SV* right= *(sp); SV* left= *(sp-1);\ + SV* const right= *(sp); SV* const left= *(sp-1);\ if ((SvAMAGIC(left)||SvAMAGIC(right))&&\ (tmpsv=amagic_call(left, \ right, \ @@ -483,3 +483,13 @@ True if this op will be the return value of an lvalue subroutine =cut */ #define LVRET ((PL_op->op_private & OPpMAYBE_LVSUB) && is_lvalue_sub()) + +/* + * Local variables: + * c-indentation-style: bsd + * c-basic-offset: 4 + * indent-tabs-mode: t + * End: + * + * ex: set ts=8 sts=4 sw=4 noet: + */ |