diff options
| author | Karl Williamson <khw@cpan.org> | 2020-10-17 06:55:50 -0600 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2020-11-22 20:06:03 -0700 |
| commit | c62fdeb784c7643c90d2ea8c2ec0f03a548da338 (patch) | |
| tree | 9c5f6ad7fe164633a5a8667402320e12d2755b45 /unicode_constants.h | |
| parent | 8dff134de1f0dc51682889d5cf8c25ab7c31bf45 (diff) | |
| download | perl-c62fdeb784c7643c90d2ea8c2ec0f03a548da338.tar.gz | |
Restrict scope/Shorten some very long macro names
The names were intended to force people to not use them outside their
intended scopes. But by restricting those scopes in the first place, we
don't need such unwieldy names
Diffstat (limited to 'unicode_constants.h')
| -rw-r--r-- | unicode_constants.h | 20 |
1 files changed, 15 insertions, 5 deletions
diff --git a/unicode_constants.h b/unicode_constants.h index 232f18c464..eea66f6ba4 100644 --- a/unicode_constants.h +++ b/unicode_constants.h @@ -88,8 +88,10 @@ bytes. # define LATIN_SMALL_LETTER_Y_WITH_DIAERESIS_NATIVE 0xFF /* U+00FF */ # define MICRO_SIGN_NATIVE 0xB5 /* U+00B5 */ # define MICRO_SIGN_UTF8 "\xC2\xB5" /* U+00B5 */ -# define MAX_PRINT_A_FOR_USE_ONLY_BY_REGCOMP_DOT_C 0x7E /* The max code point that isPRINT_A */ +# ifdef PERL_IN_REGCOMP_C +# define MAX_PRINT_A 0x7E /* The max code point that isPRINT_A */ +# endif #endif /* ASCII/Latin1 */ #if 'A' == 193 /* EBCDIC 1047 */ \ @@ -133,8 +135,10 @@ bytes. # define LATIN_SMALL_LETTER_Y_WITH_DIAERESIS_NATIVE 0xDF /* U+00FF */ # define MICRO_SIGN_NATIVE 0xA0 /* U+00B5 */ # define MICRO_SIGN_UTF8 "\x80\x64" /* U+00B5 */ -# define MAX_PRINT_A_FOR_USE_ONLY_BY_REGCOMP_DOT_C 0xF9 /* The max code point that isPRINT_A */ +# ifdef PERL_IN_REGCOMP_C +# define MAX_PRINT_A 0xF9 /* The max code point that isPRINT_A */ +# endif #endif /* EBCDIC 1047 */ #if 'A' == 193 /* EBCDIC 037 */ \ @@ -178,15 +182,21 @@ bytes. # define LATIN_SMALL_LETTER_Y_WITH_DIAERESIS_NATIVE 0xDF /* U+00FF */ # define MICRO_SIGN_NATIVE 0xA0 /* U+00B5 */ # define MICRO_SIGN_UTF8 "\x78\x63" /* U+00B5 */ -# define MAX_PRINT_A_FOR_USE_ONLY_BY_REGCOMP_DOT_C 0xF9 /* The max code point that isPRINT_A */ +# ifdef PERL_IN_REGCOMP_C +# define MAX_PRINT_A 0xF9 /* The max code point that isPRINT_A */ +# endif #endif /* EBCDIC 037 */ /* The number of code points not matching \pC */ -#define NON_OTHER_COUNT_FOR_USE_ONLY_BY_REGCOMP_DOT_C 143698 +#ifdef PERL_IN_REGCOMP_C +# define NON_OTHER_COUNT 143698 +#endif /* The highest code point that has any type of case change */ -#define HIGHEST_CASE_CHANGING_CP_FOR_USE_ONLY_BY_UTF8_DOT_C 0x1E943 +#ifdef PERL_IN_UTF8_C +# define HIGHEST_CASE_CHANGING_CP 0x1E943 +#endif #endif /* PERL_UNICODE_CONSTANTS_H_ */ |