diff options
author | Chip Salzenberg <chip@pobox.com> | 2009-08-26 14:33:15 -0700 |
---|---|---|
committer | Chip Salzenberg <chip@pobox.com> | 2009-08-26 14:33:15 -0700 |
commit | eaf7a4d2ee7805b14e26e634fba0893913924a6c (patch) | |
tree | 4c932a2ae4599ff971a6e2b488ea8208d2510182 /embed.h | |
parent | 8ff3e83ba54cff6118a4f9fd629260c21194f290 (diff) | |
download | perl-eaf7a4d2ee7805b14e26e634fba0893913924a6c.tar.gz |
In C<use utf8; a=>'b'>, do not set utf8 flag on 'a' [perl #68812]
Diffstat (limited to 'embed.h')
-rw-r--r-- | embed.h | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -363,6 +363,7 @@ #define is_uni_print_lc Perl_is_uni_print_lc #define is_uni_punct_lc Perl_is_uni_punct_lc #define is_uni_xdigit_lc Perl_is_uni_xdigit_lc +#define is_ascii_string Perl_is_ascii_string #define is_utf8_char Perl_is_utf8_char #define is_utf8_string Perl_is_utf8_string #define is_utf8_string_loclen Perl_is_utf8_string_loclen @@ -2701,6 +2702,7 @@ #define is_uni_print_lc(a) Perl_is_uni_print_lc(aTHX_ a) #define is_uni_punct_lc(a) Perl_is_uni_punct_lc(aTHX_ a) #define is_uni_xdigit_lc(a) Perl_is_uni_xdigit_lc(aTHX_ a) +#define is_ascii_string(a,b) Perl_is_ascii_string(aTHX_ a,b) #define is_utf8_char(a) Perl_is_utf8_char(aTHX_ a) #define is_utf8_string(a,b) Perl_is_utf8_string(aTHX_ a,b) #define is_utf8_string_loclen(a,b,c,d) Perl_is_utf8_string_loclen(aTHX_ a,b,c,d) |