diff options
| author | Karl Williamson <public@khwilliamson.com> | 2012-12-23 13:49:02 -0700 |
|---|---|---|
| committer | Karl Williamson <public@khwilliamson.com> | 2012-12-23 14:05:28 -0700 |
| commit | eba68aa09a0b159ee4eef3cee1bd58ee95fdb81a (patch) | |
| tree | 4a3fd382c4ba851804dfbe58044b6d96ed20ed28 /proto.h | |
| parent | 31a09021a5558064a4417036c917712e2435edf7 (diff) | |
| download | perl-eba68aa09a0b159ee4eef3cee1bd58ee95fdb81a.tar.gz | |
handy.h: Add full complement of isIDCONT() macros
This also changes isIDCONT_utf8() to use the Perl definition, which
excludes any \W characters (the Unicode definition includes a few of
these). Tests are also added. These macros remain undocumented for
now.
Diffstat (limited to 'proto.h')
| -rw-r--r-- | proto.h | 9 |
1 files changed, 9 insertions, 0 deletions
@@ -35,6 +35,9 @@ PERL_CALLCONV void Perl_Slab_Free(pTHX_ void *op) PERL_CALLCONV bool Perl__is_uni_FOO(pTHX_ const U8 classnum, const UV c) __attribute__warn_unused_result__; +PERL_CALLCONV bool Perl__is_uni_perl_idcont(pTHX_ UV c) + __attribute__warn_unused_result__; + PERL_CALLCONV bool Perl__is_uni_perl_idstart(pTHX_ UV c) __attribute__warn_unused_result__; @@ -50,6 +53,12 @@ PERL_CALLCONV bool Perl__is_utf8_mark(pTHX_ const U8 *p) #define PERL_ARGS_ASSERT__IS_UTF8_MARK \ assert(p) +PERL_CALLCONV bool Perl__is_utf8_perl_idcont(pTHX_ const U8 *p) + __attribute__warn_unused_result__ + __attribute__nonnull__(pTHX_1); +#define PERL_ARGS_ASSERT__IS_UTF8_PERL_IDCONT \ + assert(p) + PERL_CALLCONV bool Perl__is_utf8_perl_idstart(pTHX_ const U8 *p) __attribute__warn_unused_result__ __attribute__nonnull__(pTHX_1); |