| /dports/lang/perl5.34/perl-5.34.0/lib/ |
| H A D | bytes.t | 39 utf8::encode(my $c2_utf8 = $c2);
70 is(lc($c2), $c2_utf8, "lc under use bytes returns bytes");
71 is(uc($c2), $c2_utf8, "uc under use bytes returns bytes");
72 is(lcfirst($c2), $c2_utf8, "lcfirst under use bytes returns bytes");
73 is(ucfirst($c2), $c2_utf8, "unfirst under use bytes returns bytes");
|
| /dports/lang/perl5-devel/perl5-5.35.4-102-ge43d289c7c/lib/ |
| H A D | bytes.t | 39 utf8::encode(my $c2_utf8 = $c2);
70 is(lc($c2), $c2_utf8, "lc under use bytes returns bytes");
71 is(uc($c2), $c2_utf8, "uc under use bytes returns bytes");
72 is(lcfirst($c2), $c2_utf8, "lcfirst under use bytes returns bytes");
73 is(ucfirst($c2), $c2_utf8, "unfirst under use bytes returns bytes");
|
| /dports/lang/perl5.32/perl-5.32.1/lib/ |
| H A D | bytes.t | 32 utf8::encode(my $c2_utf8 = $c2);
63 is(lc($c2), $c2_utf8, "lc under use bytes returns bytes");
64 is(uc($c2), $c2_utf8, "uc under use bytes returns bytes");
65 is(lcfirst($c2), $c2_utf8, "lcfirst under use bytes returns bytes");
66 is(ucfirst($c2), $c2_utf8, "unfirst under use bytes returns bytes");
|
| /dports/lang/perl5.30/perl-5.30.3/lib/ |
| H A D | bytes.t | 32 utf8::encode(my $c2_utf8 = $c2);
63 is(lc($c2), $c2_utf8, "lc under use bytes returns bytes");
64 is(uc($c2), $c2_utf8, "uc under use bytes returns bytes");
65 is(lcfirst($c2), $c2_utf8, "lcfirst under use bytes returns bytes");
66 is(ucfirst($c2), $c2_utf8, "unfirst under use bytes returns bytes");
|
| /dports/lang/perl5.30/perl-5.30.3/ |
| H A D | regexp.h | 871 U8 c2_utf8[UTF8_MAXBYTES+1]; member
886 U8 c2_utf8[UTF8_MAXBYTES+1]; member
|
| H A D | regexec.c | 4157 U8* c1_utf8, int *c2p, U8* c2_utf8, regmatch_info *reginfo) in S_setup_EXACTISH_ST_c1_c2() argument
4241 Copy(pat, c2_utf8, UTF8SKIP(pat), U8); in S_setup_EXACTISH_ST_c1_c2()
4436 uvchr_to_utf8(c2_utf8, c2); in S_setup_EXACTISH_ST_c1_c2()
4443 *c2p = (UTF8_IS_INVARIANT(*c2_utf8)) in S_setup_EXACTISH_ST_c1_c2()
4444 ? *c2_utf8 in S_setup_EXACTISH_ST_c1_c2()
8328 valid_utf8_to_uvchr(ST.c2_utf8, NULL)) in S_regmatch()
8599 && memNE(locinput, ST.c2_utf8, in S_regmatch()
8684 || memEQ(locinput, ST.c2_utf8, in S_regmatch()
9449 U8 c1_utf8[UTF8_MAXBYTES+1], c2_utf8[UTF8_MAXBYTES+1]; in S_regrepeat() local
9453 if (S_setup_EXACTISH_ST_c1_c2(aTHX_ p, &c1, c1_utf8, &c2, c2_utf8, in S_regrepeat()
[all …]
|
| /dports/lang/perl5.32/perl-5.32.1/ |
| H A D | regexp.h | 869 U8 c2_utf8[UTF8_MAXBYTES+1]; member
884 U8 c2_utf8[UTF8_MAXBYTES+1]; member
|
| H A D | regexec.c | 4212 U8* c1_utf8, int *c2p, U8* c2_utf8, regmatch_info *reginfo) in S_setup_EXACTISH_ST_c1_c2() argument
4299 Copy(pat, c2_utf8, UTF8SKIP(pat), U8); in S_setup_EXACTISH_ST_c1_c2()
4496 uvchr_to_utf8(c2_utf8, c2); in S_setup_EXACTISH_ST_c1_c2()
4503 *c2p = (UTF8_IS_INVARIANT(*c2_utf8)) in S_setup_EXACTISH_ST_c1_c2()
4504 ? *c2_utf8 in S_setup_EXACTISH_ST_c1_c2()
8494 valid_utf8_to_uvchr(ST.c2_utf8, NULL)) in S_regmatch()
8765 && memNE(locinput, ST.c2_utf8, in S_regmatch()
8850 || memEQ(locinput, ST.c2_utf8, in S_regmatch()
9638 U8 c1_utf8[UTF8_MAXBYTES+1], c2_utf8[UTF8_MAXBYTES+1]; in S_regrepeat() local
9642 if (S_setup_EXACTISH_ST_c1_c2(aTHX_ p, &c1, c1_utf8, &c2, c2_utf8, in S_regrepeat()
[all …]
|