diff options
author | Karl Williamson <khw@cpan.org> | 2019-03-06 14:00:10 -0700 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2019-03-06 14:24:13 -0700 |
commit | c11f6329a2001a507b929b443e7512970fe62202 (patch) | |
tree | aecb00063e379eba8331fa591c61e1f41886d399 /unicode_constants.h | |
parent | 44289c0b2f08b3d5d540647539cc711c1ba0444c (diff) | |
download | perl-c11f6329a2001a507b929b443e7512970fe62202.tar.gz |
Check for \n in EBCDIC code pages
IBM says that there are 13 characters whose code point varies depending
on the EBCDIC code page. They fail to mention that the \n character may
also vary. This commit adds checks for \n, in addition to the checks
for the 13 graphic variant ones.
Diffstat (limited to 'unicode_constants.h')
-rw-r--r-- | unicode_constants.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/unicode_constants.h b/unicode_constants.h index 4aed3b0c46..00b9a096f4 100644 --- a/unicode_constants.h +++ b/unicode_constants.h @@ -93,7 +93,7 @@ bytes. #if 'A' == 193 /* EBCDIC 1047 */ \ && '\\' == 224 && '[' == 173 && ']' == 189 && '{' == 192 && '}' == 208 \ && '^' == 95 && '~' == 161 && '!' == 90 && '#' == 123 && '|' == 79 \ - && '$' == 91 && '@' == 124 && '`' == 121 + && '$' == 91 && '@' == 124 && '`' == 121 && '\n' == 21 # define LATIN_SMALL_LETTER_LONG_S_UTF8 "\x8F\x73" /* U+017F */ # define COMBINING_GRAVE_ACCENT_UTF8 "\xAF\x41" /* U+0300 */ @@ -136,7 +136,7 @@ bytes. #if 'A' == 193 /* EBCDIC 037 */ \ && '\\' == 224 && '[' == 186 && ']' == 187 && '{' == 192 && '}' == 208 \ && '^' == 176 && '~' == 161 && '!' == 90 && '#' == 123 && '|' == 79 \ - && '$' == 91 && '@' == 124 && '`' == 121 + && '$' == 91 && '@' == 124 && '`' == 121 && '\n' == 37 # define LATIN_SMALL_LETTER_LONG_S_UTF8 "\x8E\x72" /* U+017F */ # define COMBINING_GRAVE_ACCENT_UTF8 "\xAD\x41" /* U+0300 */ |