diff options
author | Karl Williamson <khw@cpan.org> | 2019-10-02 17:56:01 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2019-10-06 11:07:09 -0600 |
commit | 1df634280fbf565fc9e9ada123c12a82404aa817 (patch) | |
tree | 76c4eef4e7b829a89307e76fa6c3c57468f76cdc /utfebcdic.h | |
parent | 4bab39bc1904f776c12d31a54ff5abe06fc9c103 (diff) | |
download | perl-1df634280fbf565fc9e9ada123c12a82404aa817.tar.gz |
Make defn of UTF_IS_ABOVE_LATIN1 common
This can be derived from other values, removing an EBCDIC dependency
Diffstat (limited to 'utfebcdic.h')
-rw-r--r-- | utfebcdic.h | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/utfebcdic.h b/utfebcdic.h index 8fe4bdc143..751fa0a9bd 100644 --- a/utfebcdic.h +++ b/utfebcdic.h @@ -224,12 +224,6 @@ explicitly forbidden, and the shortest possible encoding should always be used #define UTF8_IS_DOWNGRADEABLE_START(c) _generic_isCC(c, \ _CC_UTF8_IS_DOWNGRADEABLE_START) -/* Equivalent to (UTF8_IS_START(c) && ! UTF8_IS_DOWNGRADEABLE_START(c)) - * Makes sure that the START bit is set and the DOWNGRADEABLE bit isn't */ -#define UTF8_IS_ABOVE_LATIN1(c) cBOOL(FITS_IN_8_BITS(c) \ - && ((PL_charclass[(U8) (c)] & ( _CC_mask(_CC_UTF8_IS_START) \ - |_CC_mask(_CC_UTF8_IS_DOWNGRADEABLE_START))) \ - == _CC_mask(_CC_UTF8_IS_START))) #define isUTF8_POSSIBLY_PROBLEMATIC(c) \ _generic_isCC(c, _CC_UTF8_START_BYTE_IS_FOR_AT_LEAST_SURROGATE) |