diff options
| author | Karl Williamson <khw@cpan.org> | 2019-10-02 18:08:32 -0600 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2019-10-06 11:07:09 -0600 |
| commit | 2dc97505e86018c7ceba8c96fd84f477c8dd45d3 (patch) | |
| tree | e24f92532a3fe40c623a6175e5ee9d3f08684e8a /utfebcdic.h | |
| parent | 7c88d61e18cab1244ecd155556e1f0b3563a7e4a (diff) | |
| download | perl-2dc97505e86018c7ceba8c96fd84f477c8dd45d3.tar.gz | |
Make defn of OFFUNI_IS_INVARIANT common
This can be derived from other values, removing an EBCDIC dependency
Diffstat (limited to 'utfebcdic.h')
| -rw-r--r-- | utfebcdic.h | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/utfebcdic.h b/utfebcdic.h index d0cf139ff3..99a5bad5c3 100644 --- a/utfebcdic.h +++ b/utfebcdic.h @@ -202,9 +202,6 @@ possible to UTF-8-encode a single code point in different ways, but that is explicitly forbidden, and the shortest possible encoding should always be used (and that is what Perl does). */ -/* This is a fundamental property of UTF-EBCDIC */ -#define OFFUNI_IS_INVARIANT(c) (((UV)(c)) < 0xA0) - /* It turns out that on EBCDIC platforms, the invariants are the characters * that have ASCII equivalents, plus the C1 controls. Since the C0 controls * and DELETE are ASCII, this is the same as: (isASCII(uv) || isCNTRL_L1(uv)) |