Searched refs:I8_TO_NATIVE_UTF8 (Results 1 – 10 of 10) sorted by relevance
81 my %I8_TO_NATIVE_UTF8; # Maps I8 UTF to final UTF-EBCDIC134 if (! exists $I8_TO_NATIVE_UTF8{$charset}) {149 $I8_TO_NATIVE_UTF8{$charset}[$i] = $ebcdic_value;161 $I8_TO_NATIVE_UTF8{$charset}[$i] = shift @unused_cps;170 return $I8_TO_NATIVE_UTF8{$charset};
136 # ifndef I8_TO_NATIVE_UTF8137 # define I8_TO_NATIVE_UTF8(x) (x) macro701 I8_TO_NATIVE_UTF8(UTF_CONTINUATION_MARK)); in utf8n_to_uvchr_msgs()1198 # ifndef I8_TO_NATIVE_UTF81199 # define I8_TO_NATIVE_UTF8(a) NATIVE_TO_UTF(a) macro1256 *d++ = I8_TO_NATIVE_UTF8(( uv >> MY_SHIFT) | UTF_START_MARK(2)); in uvchr_to_utf8_flags_msgs()1257 *d++ = I8_TO_NATIVE_UTF8(( uv & MY_MASK) | MY_MARK); in uvchr_to_utf8_flags_msgs()1268 *d++ = I8_TO_NATIVE_UTF8(( uv >> ((3 - 1) * MY_SHIFT)) | UTF_START_MARK(3)); in uvchr_to_utf8_flags_msgs()1269 *d++ = I8_TO_NATIVE_UTF8(((uv >> ((2 - 1) * MY_SHIFT)) & MY_MASK) | MY_MARK); in uvchr_to_utf8_flags_msgs()1270 *d++ = I8_TO_NATIVE_UTF8(( uv /* (1 - 1) */ & MY_MASK) | MY_MARK); in uvchr_to_utf8_flags_msgs()[all …]
289 #define I8_TO_NATIVE_UTF8(ch) (__ASSERT_(FITS_IN_8_BITS(ch)) ((U8) (ch))) macro626 (UTF8_IS_START_base(c) && (c) != I8_TO_NATIVE_UTF8(0xE0))698 #define UTF_TO_NATIVE(ch) I8_TO_NATIVE_UTF8(ch)699 #define I8_TO_NATIVE(ch) I8_TO_NATIVE_UTF8(ch)869 I8_TO_NATIVE_UTF8((translate_function(c) >> UTF_ACCUMULATION_SHIFT) \873 I8_TO_NATIVE_UTF8((translate_function(c) & UTF_CONTINUATION_MASK) \906 #define ILLEGAL_UTF8_BYTE I8_TO_NATIVE_UTF8(0xC1)
141 #define I8_TO_NATIVE_UTF8(b) (__ASSERT_(FITS_IN_8_BITS(b)) PL_utf2e[(U8)(b)]) macro
253 *p-- = I8_TO_NATIVE_UTF8((shifted_uv & MASK) | MARK); in Perl_uvoffuni_to_utf8_flags_msgs()261 = I8_TO_NATIVE_UTF8((shifted_uv & MASK) | MARK); in Perl_uvoffuni_to_utf8_flags_msgs()267 = I8_TO_NATIVE_UTF8((shifted_uv & MASK) | MARK); in Perl_uvoffuni_to_utf8_flags_msgs()299 = I8_TO_NATIVE_UTF8((shifted_uv & MASK) | MARK); in Perl_uvoffuni_to_utf8_flags_msgs()342 = I8_TO_NATIVE_UTF8((shifted_uv & MASK) | MARK); in Perl_uvoffuni_to_utf8_flags_msgs()349 d[2] = I8_TO_NATIVE_UTF8((shifted_uv & MASK) | MARK); in Perl_uvoffuni_to_utf8_flags_msgs()357 d[1] = I8_TO_NATIVE_UTF8((shifted_uv & MASK) | MARK); in Perl_uvoffuni_to_utf8_flags_msgs()359 d[0] = I8_TO_NATIVE_UTF8((shifted_uv & UTF_START_MASK(utf8_skip)) in Perl_uvoffuni_to_utf8_flags_msgs()907 assert(*s0 == I8_TO_NATIVE_UTF8(0xFF)); in Perl_is_utf8_FF_helper_()1633 I8_TO_NATIVE_UTF8(UTF_MIN_CONTINUATION_BYTE)); in Perl__utf8n_to_uvchr_msgs_helper()
2441 if (*s0 != I8_TO_NATIVE_UTF8(0xFF)) { in Perl_isUTF8_CHAR()3077 if ( *s0 != I8_TO_NATIVE_UTF8(0xFF) in Perl_isUTF8_CHAR_flags()3171 if ( *s0 != I8_TO_NATIVE_UTF8(0xFF) in Perl_is_utf8_valid_partial_char_flags()
10 I8_TO_NATIVE_UTF8 # Z added by devel/scanprov
60 __UNDEF_NOT_PROVIDED__ I8_TO_NATIVE_UTF8(c) UTF_TO_NATIVE(c)62 __UNDEF_NOT_PROVIDED__ I8_TO_NATIVE_UTF8(c) (c)594 … string[i] = I8_TO_NATIVE_UTF8((uni & UTF_CONTINUATION_MASK) | UTF_CONTINUATION_MARK);597 string[0] = I8_TO_NATIVE_UTF8((uni & UTF_START_MASK(len)) | UTF_START_MARK(len));
17438 #ifndef I8_TO_NATIVE_UTF817439 # define I8_TO_NATIVE_UTF8(c) UTF_TO_NATIVE(c) macro17443 #ifndef I8_TO_NATIVE_UTF817444 # define I8_TO_NATIVE_UTF8(c) (c) macro
112 STRLEN char_bytes_len = PL_utf8skip[I8_TO_NATIVE_UTF8(start)]; in cat_utf8a2n()