diff options
author | Karl Williamson <khw@cpan.org> | 2016-09-03 12:15:29 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2016-09-17 17:22:25 -0600 |
commit | 21cb232c014d719d883ed0f8d6185dc36037859e (patch) | |
tree | 02e6a610d673f19c71eede368aa32aa04c1cbfdf | |
parent | c2b327983e89375d27cb0e1b21f0bd96e7fdd1ce (diff) | |
download | perl-21cb232c014d719d883ed0f8d6185dc36037859e.tar.gz |
regen/regcharclass.pl: surrogates are code points
They are not "characters"
-rw-r--r-- | regcharclass.h | 8 | ||||
-rwxr-xr-x | regen/regcharclass.pl | 2 |
2 files changed, 5 insertions, 5 deletions
diff --git a/regcharclass.h b/regcharclass.h index 761f08187d..ef42fb5f98 100644 --- a/regcharclass.h +++ b/regcharclass.h @@ -183,7 +183,7 @@ : ( ( ( ( 0xF4 == ((U8*)s)[0] ) && ( 0x8F == ((U8*)s)[1] ) ) && ( 0xBF == ((U8*)s)[2] ) ) && ( ( ((U8*)s)[3] & 0xFE ) == 0xBE ) ) ? 4 : 0 ) : 0 ) /* - SURROGATE: Surrogate characters + SURROGATE: Surrogate code points \p{_Perl_Surrogate} */ @@ -780,7 +780,7 @@ : ( ( ( ( ( 0xEE == ((U8*)s)[0] ) && ( 0x42 == ((U8*)s)[1] ) ) && ( 0x73 == ((U8*)s)[2] ) ) && ( 0x73 == ((U8*)s)[3] ) ) && ( ( ((U8*)s)[4] & 0xFE ) == 0x72 ) ) ? 5 : 0 ) : 0 ) /* - SURROGATE: Surrogate characters + SURROGATE: Surrogate code points \p{_Perl_Surrogate} */ @@ -1392,7 +1392,7 @@ : ( ( ( ( ( 0xEE == ((U8*)s)[0] ) && ( 0x42 == ((U8*)s)[1] ) ) && ( 0x72 == ((U8*)s)[2] ) ) && ( 0x72 == ((U8*)s)[3] ) ) && ( 0x71 == ((U8*)s)[4] || 0x72 == ((U8*)s)[4] ) ) ? 5 : 0 ) : 0 ) /* - SURROGATE: Surrogate characters + SURROGATE: Surrogate code points \p{_Perl_Surrogate} */ @@ -1898,6 +1898,6 @@ * 5c7eb94310e2aaa15702fd6bed24ff0e7ab5448f9a8231d8c49ca96c9e941089 lib/unicore/mktables * cdecb300baad839a6f62791229f551a4fa33f3cbdca08e378dc976466354e778 lib/unicore/version * 913d2f93f3cb6cdf1664db888bf840bc4eb074eef824e082fceda24a9445e60c regen/charset_translations.pl - * 863deb27147ca9d19f764755eafddf26d6227b007b1f5b6b87662bcb46cf491c regen/regcharclass.pl + * 76075c280f7e89bb2b15672be32b6cf0375bc68ef8e557c17b2e8e9d97fa86b2 regen/regcharclass.pl * 393f8d882713a3ba227351ad0f00ea4839fda74fcf77dcd1cdf31519925adba5 regen/regcharclass_multi_char_folds.pl * ex: set ro: */ diff --git a/regen/regcharclass.pl b/regen/regcharclass.pl index e22720b508..de4d3a3047 100755 --- a/regen/regcharclass.pl +++ b/regen/regcharclass.pl @@ -1633,7 +1633,7 @@ NONCHAR: Non character code points => UTF8 :safe \p{_Perl_Nchar} -SURROGATE: Surrogate characters +SURROGATE: Surrogate code points => UTF8 :safe \p{_Perl_Surrogate} |