From 78a0d3cc3d649167a7a58cbe7d5f494d42d154bd Mon Sep 17 00:00:00 2001 From: Karl Williamson Date: Sat, 26 Feb 2011 19:38:29 -0700 Subject: [PATCH] Move some #defines These were defined in a .c, but now there is need for them in another .c, so move them to a header. --- pp.c | 6 ------ utf8.h | 2 ++ 2 files changed, 2 insertions(+), 6 deletions(-) diff --git a/pp.c b/pp.c index d857c7e..d6f0332 100644 --- a/pp.c +++ b/pp.c @@ -3842,12 +3842,6 @@ PP(pp_crypt) /* Generally UTF-8 and UTF-EBCDIC are indistinguishable at this level. So * most comments below say UTF-8, when in fact they mean UTF-EBCDIC as well */ -/* Both the characters below can be stored in two UTF-8 bytes. In UTF-8 the max - * character that 2 bytes can hold is U+07FF, and in UTF-EBCDIC it is U+03FF. - * See http://www.unicode.org/unicode/reports/tr16 */ -#define LATIN_CAPITAL_LETTER_Y_WITH_DIAERESIS 0x0178 /* Also is title case */ -#define GREEK_CAPITAL_LETTER_MU 0x039C /* Upper and title case of MICRON */ - /* Below are several macros that generate code */ /* Generates code to store a unicode codepoint c that is known to occupy * exactly two UTF-8 and UTF-EBCDIC bytes; it is stored into p and p+1. */ diff --git a/utf8.h b/utf8.h index 7228000..aa0f0c7 100644 --- a/utf8.h +++ b/utf8.h @@ -424,6 +424,8 @@ Perl's extended UTF-8 means we can have start bytes up to FF. #define UNICODE_GREEK_SMALL_LETTER_FINAL_SIGMA 0x03C2 #define UNICODE_GREEK_SMALL_LETTER_SIGMA 0x03C3 #define GREEK_SMALL_LETTER_MU 0x03BC +#define GREEK_CAPITAL_LETTER_MU 0x039C /* Upper and title case of MICRON */ +#define LATIN_CAPITAL_LETTER_Y_WITH_DIAERESIS 0x0178 /* Also is title case */ #define UNI_DISPLAY_ISPRINT 0x0001 #define UNI_DISPLAY_BACKSLASH 0x0002 -- 2.7.4