diff options
| author | Karl Williamson <khw@cpan.org> | 2021-06-26 19:57:03 -0600 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2021-08-07 05:14:44 -0600 |
| commit | 58b66e89ba80b4f91ff12da18da1301aa182a687 (patch) | |
| tree | db91351c2e183774b4b816c78fd842d73872bc98 /embed.fnc | |
| parent | 527347e0493f4ee24d63df996fd6616806422d17 (diff) | |
| download | perl-58b66e89ba80b4f91ff12da18da1301aa182a687.tar.gz | |
Add helper function for longest UTF8 sequence
This specialized functionality is used to check the validity of Perl's
extended-length UTF-8, which has some ideosyncratic characteristics from
the shorter sequences. This means this function doesn't have to
consider those differences. It will be used in the next commit to avoid
some work, and to eventually enable is_utf8_char_helper() to be
simplified.
Diffstat (limited to 'embed.fnc')
| -rw-r--r-- | embed.fnc | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -1116,6 +1116,9 @@ ApR |I32 |is_lvalue_sub : Used in cop.h XopR |I32 |was_lvalue_sub CpRTP |STRLEN |is_utf8_char_helper|NN const U8 * const s|NN const U8 * e|const U32 flags +CpRTP |Size_t |is_utf8_FF_helper_|NN const U8 * const s0 \ + |NN const U8 * const e \ + |const bool require_partial Cp |UV |to_uni_upper |UV c|NN U8 *p|NN STRLEN *lenp Cp |UV |to_uni_title |UV c|NN U8 *p|NN STRLEN *lenp p |void |init_uniprops |