diff options
| author | Karl Williamson <khw@cpan.org> | 2021-07-30 13:57:01 -0600 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2021-07-31 15:00:37 -0600 |
| commit | 67260a96082ff542a79fd0bc3395144c94d5b958 (patch) | |
| tree | c8e6961e2a71c8d4083015ffcaceef4c47c787c3 /regen/regcharclass.pl | |
| parent | 6b28089cc4992fbc129d40723e0ce46f86abf4da (diff) | |
| download | perl-67260a96082ff542a79fd0bc3395144c94d5b958.tar.gz | |
regcharclass.h: Remove 2 EBCDIC dependencies
This commit makes is_HANGUL_ED_utf8_safe() return 0 unconditionally on
EBCDIC platforms. This means its callers don't have to care what
platform is running. Change the two callers to take advantage of this
The commit also changes the description of the macro to be slightly more
accurate
Diffstat (limited to 'regen/regcharclass.pl')
| -rwxr-xr-x | regen/regcharclass.pl | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/regen/regcharclass.pl b/regen/regcharclass.pl index 2cad7c4fdd..3ab640f50d 100755 --- a/regen/regcharclass.pl +++ b/regen/regcharclass.pl @@ -1756,6 +1756,11 @@ PATWS: pattern white space => generic : safe \p{_Perl_PatWS} -HANGUL_ED: Hangul syllables whose first character is \xED +HANGUL_ED: Hangul syllables whose first UTF-8 byte is \xED => UTF8 :only_ascii_platform safe 0xD000 - 0xD7FF + +HANGUL_ED: Hangul syllables whose first UTF-8 byte is \xED +=> UTF8 :only_ebcdic_platform safe +0x1 - 0x0 +# Alows fails on EBCDIC; there are no ED Hanguls there |