diff options
author | Andy Lester <andy@petdance.com> | 2005-03-21 18:35:55 -0600 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-03-24 16:25:58 +0000 |
commit | e1ec3a884f8d8c64eb7e391b2a363f47cbeed570 (patch) | |
tree | 13e83e61449ed542f309f1cd88e7ed42778ca543 /utfebcdic.h | |
parent | 2bbb3949e88673e7f0574ab70254a46d776242e9 (diff) | |
download | perl-e1ec3a884f8d8c64eb7e391b2a363f47cbeed570.tar.gz |
Third consting batch
Message-Id: <2f14220e7101a03f7659dbe79a03b115@petdance.com>
p4raw-id: //depot/perl@24074
Diffstat (limited to 'utfebcdic.h')
-rw-r--r-- | utfebcdic.h | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/utfebcdic.h b/utfebcdic.h index e47e90d7de..7d03608b41 100644 --- a/utfebcdic.h +++ b/utfebcdic.h @@ -337,7 +337,7 @@ EXTCONST unsigned char PL_a2e[]; END_EXTERN_C -#define UTF8SKIP(s) PL_utf8skip[*(U8*)s] +#define UTF8SKIP(s) PL_utf8skip[*(const U8*)s] /* EBCDIC-happy ways of converting native code to UTF-8 */ @@ -363,10 +363,10 @@ END_EXTERN_C #define isIDFIRST_lazy_if(p,c) ((IN_BYTES || (!c || UTF8_IS_INVARIANT(*p))) \ ? isIDFIRST(*(p)) \ - : isIDFIRST_utf8((U8*)p)) + : isIDFIRST_utf8((const U8*)p)) #define isALNUM_lazy_if(p,c) ((IN_BYTES || (!c || UTF8_IS_INVARIANT(*p))) \ ? isALNUM(*(p)) \ - : isALNUM_utf8((U8*)p)) + : isALNUM_utf8((const U8*)p)) /* The following table is adapted from tr16, it shows UTF-8-mod encoding of Unicode code points. |