Home
last modified time | relevance | path

Searched refs:is_utf8 (Results 1 – 19 of 19) sorted by relevance

/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/
H A Dutf8.t347 ok(!utf8::is_utf8($a), "!utf8::is_utf8 basic");
348 ok(!utf8::is_utf8($b), "!utf8::is_utf8 beyond");
349 ok( utf8::is_utf8($c), "utf8::is_utf8 unicode");
363 ok( utf8::is_utf8($a), "utf8::is_utf8 basic");
364 ok( utf8::is_utf8($b), "utf8::is_utf8 beyond");
365 ok( utf8::is_utf8($c), "utf8::is_utf8 unicode");
376 ok(!utf8::is_utf8($a), "!utf8::is_utf8 basic");
377 ok(!utf8::is_utf8($b), "!utf8::is_utf8 beyond");
392 ok(!utf8::is_utf8($a), "!utf8::is_utf8 basic");
393 ok(!utf8::is_utf8($b), "!utf8::is_utf8 beyond");
[all …]
/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/ext/Encode/t/
H A DEncode.t20 find_encoding is_utf8);
132 # is_utf8
134 ok( is_utf8("\x{100}"));
135 ok(! is_utf8("a"));
136 ok(! is_utf8(""));
138 ok( is_utf8($1)); # ID 20011127.151
140 ok( is_utf8($a));
143 ok( is_utf8($a)); # weird but true: an empty UTF-8 string
/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/
H A Dhv.c381 bool is_utf8; in S_hv_fetch_common() local
392 is_utf8 = (SvUTF8(keysv) != 0); in S_hv_fetch_common()
394 is_utf8 = ((flags & HVhek_UTF8) ? TRUE : FALSE); in S_hv_fetch_common()
409 if (is_utf8) { in S_hv_fetch_common()
480 if (keysv || is_utf8) { in S_hv_fetch_common()
506 is_utf8 = 0; in S_hv_fetch_common()
522 if (keysv || is_utf8) { in S_hv_fetch_common()
548 is_utf8 = 0; in S_hv_fetch_common()
585 if (is_utf8) { in S_hv_fetch_common()
587 key = (char*)bytes_from_utf8((U8*)key, &klen, &is_utf8); in S_hv_fetch_common()
[all …]
H A Ddoop.c1085 bool is_utf8 = TRUE; in Perl_do_chomp() local
1087 &rslen, &is_utf8); in Perl_do_chomp()
1088 if (is_utf8) { in Perl_do_chomp()
H A Dutf8.c775 Perl_bytes_from_utf8(pTHX_ U8 *s, STRLEN *len, bool *is_utf8) in Perl_bytes_from_utf8() argument
782 if (!*is_utf8) in Perl_bytes_from_utf8()
797 *is_utf8 = 0; in Perl_bytes_from_utf8()
H A Dsv.c5862 bool is_utf8 = TRUE; in Perl_sv_eq() local
5868 &cur1, &is_utf8); in Perl_sv_eq()
5876 &cur2, &is_utf8); in Perl_sv_eq()
5880 if (is_utf8) { in Perl_sv_eq()
6870 bool is_utf8 = FALSE; in Perl_newSVpvn_share() local
6873 is_utf8 = TRUE; in Perl_newSVpvn_share()
6875 src = (char*)bytes_from_utf8((U8*)src, &tmplen, &is_utf8); in Perl_newSVpvn_share()
6882 SvPVX(sv) = sharepvn(src, is_utf8?-len:len, hash); in Perl_newSVpvn_share()
6889 if (is_utf8) in Perl_newSVpvn_share()
8427 bool is_utf8 = FALSE; /* is this item utf8? */ in Perl_sv_vcatpvfn() local
[all …]
H A Dproto.h801 PERL_CALLCONV U8* Perl_bytes_from_utf8(pTHX_ U8 *s, STRLEN *len, bool *is_utf8);
/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/ext/Encode/lib/Encode/
H A DEncoder.pm21 $encname = Encode::is_utf8($data) ? 'utf8' : '';
H A DGuess.pm74 if ( Encode::is_utf8($octet) ) {
/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/t/op/
H A Dbop.t178 ok(utf8::is_utf8($a)); # make sure UTF8 flag is still there
/onnv-gate/usr/src/lib/libparted/common/lib/
H A Dregex_internal.h409 unsigned char is_utf8; member
693 unsigned int is_utf8 : 1; member
H A Dregex_internal.c182 pstr->is_utf8 = dfa->is_utf8; in re_string_construct_common()
708 if (pstr->is_utf8) in re_string_reconstruct()
H A Dregcomp.c804 if (dfa->is_utf8 && !(syntax & RE_ICASE) && preg->translate == NULL) in re_compile_internal()
871 dfa->is_utf8 = 1; in init_dfa()
876 dfa->is_utf8 = 1; in init_dfa()
886 if (dfa->is_utf8) in init_dfa()
1106 dfa->is_utf8 = 0; in optimize_utf8()
/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/ext/Encode/
H A DEncode.xs600 is_utf8(sv, check = 0)
/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/pod/
H A Dperluniintro.pod507 the discussion about the C<utf8::is_utf8()> function.
628 print utf8::is_utf8($string) ? 1 : 0, "\n";
633 string has any characters at all. All the C<is_utf8()> does is to
H A Dperl581delta.pod273 utf8::is_utf8() has been added as a quick way to test whether
H A Dperlapi.pod4670 is unchanged. Do nothing if C<is_utf8> points to 0. Sets C<is_utf8> to
4676 U8* bytes_from_utf8(U8 *s, STRLEN *len, bool *is_utf8)
H A Dperltoc.pod9889 utf8::is_utf8(STRING), $flag = utf8::valid(STRING)
12291 is_utf8(STRING [, CHECK]), _utf8_on(STRING), _utf8_off(STRING)
/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/ext/Storable/
H A DStorable.xs2314 bool is_utf8 = TRUE; in store_hash() local
2321 &is_utf8); in store_hash()