diff options
author | Steve Peters <steve@fisharerojo.org> | 2005-10-14 03:46:24 +0000 |
---|---|---|
committer | Steve Peters <steve@fisharerojo.org> | 2005-10-14 03:46:24 +0000 |
commit | 0d46e09a6299ee39ec954683a582d25f5ea086c7 (patch) | |
tree | 308ac72e3d80a80d27e1d0b18bbbaca691de50f9 /pp.c | |
parent | 6d24ed100318c05343c5524872a98bee8e2fcca4 (diff) | |
download | perl-0d46e09a6299ee39ec954683a582d25f5ea086c7.tar.gz |
gcc complains when it sees variables declared
const register ...
switched them all to
register const ...
p4raw-id: //depot/perl@25757
Diffstat (limited to 'pp.c')
-rw-r--r-- | pp.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -3601,7 +3601,7 @@ PP(pp_uc) } s = (U8*)SvPV_force_nomg(sv, len); if (len) { - const register U8 *send = s + len; + register const U8 *send = s + len; if (IN_LOCALE_RUNTIME) { TAINT; @@ -3728,7 +3728,7 @@ PP(pp_quotemeta) dSP; dTARGET; SV * const sv = TOPs; STRLEN len; - const register char *s = SvPV_const(sv,len); + register const char *s = SvPV_const(sv,len); SvUTF8_off(TARG); /* decontaminate */ if (len) { |