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 /utf8.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 'utf8.h')
| -rw-r--r-- | utf8.h | 10 |
1 files changed, 5 insertions, 5 deletions
@@ -42,7 +42,7 @@ EXTCONST unsigned char PL_utf8skip[]; #endif END_EXTERN_C -#define UTF8SKIP(s) PL_utf8skip[*(U8*)s] +#define UTF8SKIP(s) PL_utf8skip[*(const U8*)s] /* Native character to iso-8859-1 */ #define NATIVE_TO_ASCII(ch) (ch) @@ -147,12 +147,12 @@ encoded character. * (that is, the two high bits are set). Otherwise we risk loading in the * heavy-duty SWASHINIT and SWASHGET routines unnecessarily. */ -#define isIDFIRST_lazy_if(p,c) ((IN_BYTES || (!c || (*((U8*)p) < 0xc0))) \ +#define isIDFIRST_lazy_if(p,c) ((IN_BYTES || (!c || (*((const U8*)p) < 0xc0))) \ ? isIDFIRST(*(p)) \ - : isIDFIRST_utf8((U8*)p)) -#define isALNUM_lazy_if(p,c) ((IN_BYTES || (!c || (*((U8*)p) < 0xc0))) \ + : isIDFIRST_utf8((const U8*)p)) +#define isALNUM_lazy_if(p,c) ((IN_BYTES || (!c || (*((const U8*)p) < 0xc0))) \ ? isALNUM(*(p)) \ - : isALNUM_utf8((U8*)p)) + : isALNUM_utf8((const U8*)p)) #endif /* EBCDIC vs ASCII */ |