summaryrefslogtreecommitdiff
path: root/unicode_constants.h
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2019-03-06 14:00:10 -0700
committerKarl Williamson <khw@cpan.org>2019-03-06 14:24:13 -0700
commitc11f6329a2001a507b929b443e7512970fe62202 (patch)
treeaecb00063e379eba8331fa591c61e1f41886d399 /unicode_constants.h
parent44289c0b2f08b3d5d540647539cc711c1ba0444c (diff)
downloadperl-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.h4
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 */