diff options
author | Karl Williamson <khw@cpan.org> | 2016-12-15 19:51:26 -0700 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2016-12-23 16:48:36 -0700 |
commit | 34aeb2e92066dd41c16797e63eb0496735b5dfe4 (patch) | |
tree | c4467b0a0ad58174574782fcb79ffbb5902a339f /utf8.h | |
parent | 24e16d7b405f10168aae144d4a2c37d9c6443b9e (diff) | |
download | perl-34aeb2e92066dd41c16797e63eb0496735b5dfe4.tar.gz |
Deprecate isFOO_utf8() macros
These macros are being replaced by a safe version; they now generate a
deprecation message at each call site upon the first use there in each
program run.
Diffstat (limited to 'utf8.h')
-rw-r--r-- | utf8.h | 20 |
1 files changed, 13 insertions, 7 deletions
@@ -672,24 +672,30 @@ with a ptr argument. * beginning of a utf8 character. Now that foo_utf8() determines that itself, * no need to do it again here */ -#define isIDFIRST_lazy_if(p,UTF) ((IN_BYTES || !UTF) \ - ? isIDFIRST(*(p)) \ - : isIDFIRST_utf8((const U8*)p)) -#define isWORDCHAR_lazy_if(p,UTF) ((IN_BYTES || (!UTF)) \ - ? isWORDCHAR(*(p)) \ - : isWORDCHAR_utf8((const U8*)p)) -#define isALNUM_lazy_if(p,UTF) isWORDCHAR_lazy_if(p,UTF) +#define isIDFIRST_lazy_if(p,UTF) \ + _is_utf8_FOO(_CC_IDFIRST, (const U8 *) p, "isIDFIRST_lazy_if", \ + "isIDFIRST_lazy_if_safe", \ + cBOOL(UTF && ! IN_BYTES), 0, __FILE__,__LINE__) #define isIDFIRST_lazy_if_safe(p, e, UTF) \ ((IN_BYTES || !UTF) \ ? isIDFIRST(*(p)) \ : isIDFIRST_utf8_safe(p, e)) +#define isWORDCHAR_lazy_if(p,UTF) \ + _is_utf8_FOO(_CC_IDFIRST, (const U8 *) p, "isWORDCHAR_lazy_if", \ + "isWORDCHAR_lazy_if_safe", \ + cBOOL(UTF && ! IN_BYTES), 0, __FILE__,__LINE__) + #define isWORDCHAR_lazy_if_safe(p, e, UTF) \ ((IN_BYTES || !UTF) \ ? isWORDCHAR(*(p)) \ : isWORDCHAR_utf8_safe((U8 *) p, (U8 *) e)) +#define isALNUM_lazy_if(p,UTF) \ + _is_utf8_FOO(_CC_IDFIRST, (const U8 *) p, "isALNUM_lazy_if", \ + "isWORDCHAR_lazy_if_safe", \ + cBOOL(UTF && ! IN_BYTES), 0, __FILE__,__LINE__) #define UTF8_MAXLEN UTF8_MAXBYTES |