/dports/lang/perl5.34/perl-5.34.0/dist/Devel-PPPort/parts/inc/ |
H A D | newSVpv | 29 __UNDEFINED__ newSVpvn_utf8(s, len, u) newSVpvn_flags((s), (len), (u) ? SVf_UTF8 : 0) 31 __UNDEFINED__ SVf_UTF8 0 35 …v = newSVpvn(D_PPP_CONSTPV_ARG((s)), (len)); SvFLAGS(_sv) |= ((flags) & SVf_UTF8); ((flags) & SVs_… 37 … newSVpvn(D_PPP_CONSTPV_ARG((s)), (len))), SvFLAGS(PL_Sv) |= ((flags) & SVf_UTF8), (((flags) & SVs… 66 XPUSHs(newSVpvn_flags("test", 4, SVs_TEMP|SVf_UTF8));
|
/dports/lang/perl5.32/perl-5.32.1/dist/Devel-PPPort/parts/inc/ |
H A D | newSVpv | 29 __UNDEFINED__ newSVpvn_utf8(s, len, u) newSVpvn_flags((s), (len), (u) ? SVf_UTF8 : 0) 31 __UNDEFINED__ SVf_UTF8 0 35 …v = newSVpvn(D_PPP_CONSTPV_ARG((s)), (len)); SvFLAGS(_sv) |= ((flags) & SVf_UTF8); ((flags) & SVs_… 37 … newSVpvn(D_PPP_CONSTPV_ARG((s)), (len))), SvFLAGS(PL_Sv) |= ((flags) & SVf_UTF8), (((flags) & SVs… 66 XPUSHs(newSVpvn_flags("test", 4, SVs_TEMP|SVf_UTF8));
|
/dports/devel/p5-Devel-PPPort/Devel-PPPort-3.63/parts/inc/ |
H A D | newSVpv | 29 __UNDEFINED__ newSVpvn_utf8(s, len, u) newSVpvn_flags((s), (len), (u) ? SVf_UTF8 : 0) 31 __UNDEFINED__ SVf_UTF8 0 35 …v = newSVpvn(D_PPP_CONSTPV_ARG((s)), (len)); SvFLAGS(_sv) |= ((flags) & SVf_UTF8); ((flags) & SVs_… 37 … newSVpvn(D_PPP_CONSTPV_ARG((s)), (len))), SvFLAGS(PL_Sv) |= ((flags) & SVf_UTF8), (((flags) & SVs… 66 XPUSHs(newSVpvn_flags("test", 4, SVs_TEMP|SVf_UTF8));
|
/dports/lang/perl5-devel/perl5-5.35.4-102-ge43d289c7c/dist/Devel-PPPort/parts/inc/ |
H A D | newSVpv | 29 __UNDEFINED__ newSVpvn_utf8(s, len, u) newSVpvn_flags((s), (len), (u) ? SVf_UTF8 : 0) 31 __UNDEFINED__ SVf_UTF8 0 35 …v = newSVpvn(D_PPP_CONSTPV_ARG((s)), (len)); SvFLAGS(_sv) |= ((flags) & SVf_UTF8); ((flags) & SVs_… 37 … newSVpvn(D_PPP_CONSTPV_ARG((s)), (len))), SvFLAGS(PL_Sv) |= ((flags) & SVf_UTF8), (((flags) & SVs… 66 XPUSHs(newSVpvn_flags("test", 4, SVs_TEMP|SVf_UTF8));
|
/dports/lang/perl5.30/perl-5.30.3/dist/Devel-PPPort/parts/inc/ |
H A D | newSVpv | 29 __UNDEFINED__ newSVpvn_utf8(s, len, u) newSVpvn_flags((s), (len), (u) ? SVf_UTF8 : 0) 31 __UNDEFINED__ SVf_UTF8 0 41 SvFLAGS(sv) |= (flags & SVf_UTF8); 78 XPUSHs(newSVpvn_flags("test", 4, SVs_TEMP|SVf_UTF8));
|
/dports/devel/p5-B-C/B-C-1.57/ramblings/ |
H A D | Export-store_cop_label-on-Windows.patch | 51 + Perl_store_cop_label(aTHX_ cop, "foä", 4, SVf_UTF8); 73 +The flags pointer may be set to C<SVf_UTF8> or 0. 88 +Save a label into a C<cop_hints_hash>. You need to set flags to C<SVf_UTF8>
|
/dports/lang/perl5.34/perl-5.34.0/ |
H A D | sv.h | 450 #define SVf_UTF8 0x20000000 /* SvPV is UTF-8 encoded macro 880 SVf_IVisUV|SVf_UTF8), \ 884 SVf_UTF8), \ 950 #define SvUTF8(sv) (SvFLAGS(sv) & SVf_UTF8) 951 #define SvUTF8_on(sv) (SvFLAGS(sv) |= (SVf_UTF8)) 952 #define SvUTF8_off(sv) (SvFLAGS(sv) &= ~(SVf_UTF8)) 960 SVf_IVisUV|SVf_UTF8), \ 1039 #define SvPOK_utf8_nog(sv) ((SvFLAGS(sv) & (SVf_POK|SVf_UTF8|SVs_GMG)) == (SVf_POK|SVf_UTF8)) 1040 …SvPOK_utf8_nogthink(sv) ((SvFLAGS(sv) & (SVf_POK|SVf_UTF8|SVf_THINKFIRST|SVs_GMG)) == (SVf_POK|SVf… 1048 …((SvFLAGS(sv) & (SVf_POK|SVf_UTF8|SVf_IOK|SVf_NOK|SVf_ROK|SVpgv_GP|SVf_THINKFIRST|SVs_GMG)) == (SV… [all …]
|
H A D | gv.c | 377 flags |= SVf_UTF8; in Perl_gv_init_sv() 450 gv_name_set(gv, name, len, GV_ADD | ( flags & SVf_UTF8 ? SVf_UTF8 : 0 )); in Perl_gv_init_pvn() 678 if (SvUTF8(namesv)) flags |= SVf_UTF8; in Perl_gv_fetchmeth_sv() 749 U32 is_utf8 = flags & SVf_UTF8; in S_gv_fetchmeth_internal() 950 flags |= SVf_UTF8; in Perl_gv_fetchmeth_sv_autoload() 1061 flags |= SVf_UTF8; in Perl_gv_fetchmethod_sv_flags() 1083 const U32 is_utf8 = flags & SVf_UTF8; in Perl_gv_fetchmethod_pvn_flags() 1232 flags |= SVf_UTF8; in Perl_gv_autoload_sv() 1252 U32 is_utf8 = flags & SVf_UTF8 ? SVf_UTF8 : 0; in Perl_gv_autoload_pvn() 1538 hv_name_set(stash, name, namelen, flags & SVf_UTF8 ? SVf_UTF8 : 0 ); in S_gv_stashpvn_internal() [all …]
|
H A D | hv.c | 378 ? SVf_UTF8 : 0)); in Perl_hv_common() 2464 if ( (HEK_UTF8(hek) ? 1 : 0) != (flags & SVf_UTF8 ? 1 : 0) ) { in hek_eq_pvn_flags() 2465 if (flags & SVf_UTF8) in hek_eq_pvn_flags() 2512 (HEK_UTF8(*hekp) || (flags & SVf_UTF8)) in Perl_hv_ename_add() 2530 (HEK_UTF8(existing_name) || (flags & SVf_UTF8)) in Perl_hv_ename_add() 2575 (HEK_UTF8(*victim) || (flags & SVf_UTF8)) in Perl_hv_ename_delete() 2599 count > 0 && ((HEK_UTF8(*namep) || (flags & SVf_UTF8)) in Perl_hv_ename_delete() 2608 (HEK_UTF8(aux->xhv_name_u.xhvnameu_name) || (flags & SVf_UTF8)) in Perl_hv_ename_delete() 3785 == HVrhek_PV_UTF8) ? SVf_UTF8 : 0; in Perl_cop_fetch_label() 3807 if (flags & ~(SVf_UTF8)) in Perl_cop_store_label() [all …]
|
/dports/lang/perl5-devel/perl5-5.35.4-102-ge43d289c7c/ |
H A D | sv.h | 452 #define SVf_UTF8 0x20000000 /* SvPV is UTF-8 encoded macro 884 SVf_IVisUV|SVf_UTF8), \ 888 SVf_UTF8), \ 954 #define SvUTF8(sv) (SvFLAGS(sv) & SVf_UTF8) 955 #define SvUTF8_on(sv) (SvFLAGS(sv) |= (SVf_UTF8)) 956 #define SvUTF8_off(sv) (SvFLAGS(sv) &= ~(SVf_UTF8)) 964 SVf_IVisUV|SVf_UTF8), \ 1043 #define SvPOK_utf8_nog(sv) ((SvFLAGS(sv) & (SVf_POK|SVf_UTF8|SVs_GMG)) == (SVf_POK|SVf_UTF8)) 1044 …SvPOK_utf8_nogthink(sv) ((SvFLAGS(sv) & (SVf_POK|SVf_UTF8|SVf_THINKFIRST|SVs_GMG)) == (SVf_POK|SVf… 1052 …((SvFLAGS(sv) & (SVf_POK|SVf_UTF8|SVf_IOK|SVf_NOK|SVf_ROK|SVpgv_GP|SVf_THINKFIRST|SVs_GMG)) == (SV… [all …]
|
H A D | gv.c | 377 flags |= SVf_UTF8; in Perl_gv_init_sv() 450 gv_name_set(gv, name, len, GV_ADD | ( flags & SVf_UTF8 ? SVf_UTF8 : 0 )); in Perl_gv_init_pvn() 678 if (SvUTF8(namesv)) flags |= SVf_UTF8; in Perl_gv_fetchmeth_sv() 749 U32 is_utf8 = flags & SVf_UTF8; in S_gv_fetchmeth_internal() 950 flags |= SVf_UTF8; in Perl_gv_fetchmeth_sv_autoload() 1061 flags |= SVf_UTF8; in Perl_gv_fetchmethod_sv_flags() 1083 const U32 is_utf8 = flags & SVf_UTF8; in Perl_gv_fetchmethod_pvn_flags() 1232 flags |= SVf_UTF8; in Perl_gv_autoload_sv() 1252 U32 is_utf8 = flags & SVf_UTF8 ? SVf_UTF8 : 0; in Perl_gv_autoload_pvn() 1538 hv_name_set(stash, name, namelen, flags & SVf_UTF8 ? SVf_UTF8 : 0 ); in S_gv_stashpvn_internal() [all …]
|
H A D | hv.c | 378 ? SVf_UTF8 : 0)); in Perl_hv_common() 2429 if ( (HEK_UTF8(hek) ? 1 : 0) != (flags & SVf_UTF8 ? 1 : 0) ) { in hek_eq_pvn_flags() 2430 if (flags & SVf_UTF8) in hek_eq_pvn_flags() 2477 (HEK_UTF8(*hekp) || (flags & SVf_UTF8)) in Perl_hv_ename_add() 2495 (HEK_UTF8(existing_name) || (flags & SVf_UTF8)) in Perl_hv_ename_add() 2540 (HEK_UTF8(*victim) || (flags & SVf_UTF8)) in Perl_hv_ename_delete() 2563 count > 0 && ((HEK_UTF8(*namep) || (flags & SVf_UTF8)) in Perl_hv_ename_delete() 2572 (HEK_UTF8(aux->xhv_name_u.xhvnameu_name) || (flags & SVf_UTF8)) in Perl_hv_ename_delete() 3735 == HVrhek_PV_UTF8) ? SVf_UTF8 : 0; in Perl_cop_fetch_label() 3757 if (flags & ~(SVf_UTF8)) in Perl_cop_store_label() [all …]
|
/dports/lang/perl5.30/perl-5.30.3/ |
H A D | sv.h | 444 #define SVf_UTF8 0x20000000 /* SvPV is UTF-8 encoded macro 857 SVf_IVisUV|SVf_UTF8), \ 861 SVf_UTF8), \ 927 #define SvUTF8(sv) (SvFLAGS(sv) & SVf_UTF8) 928 #define SvUTF8_on(sv) (SvFLAGS(sv) |= (SVf_UTF8)) 929 #define SvUTF8_off(sv) (SvFLAGS(sv) &= ~(SVf_UTF8)) 937 SVf_IVisUV|SVf_UTF8), \ 1000 #define SvPOK_utf8_nog(sv) ((SvFLAGS(sv) & (SVf_POK|SVf_UTF8|SVs_GMG)) == (SVf_POK|SVf_UTF8)) 1001 …SvPOK_utf8_nogthink(sv) ((SvFLAGS(sv) & (SVf_POK|SVf_UTF8|SVf_THINKFIRST|SVs_GMG)) == (SVf_POK|SVf… 1009 …((SvFLAGS(sv) & (SVf_POK|SVf_UTF8|SVf_IOK|SVf_NOK|SVf_ROK|SVpgv_GP|SVf_THINKFIRST|SVs_GMG)) == (SV… [all …]
|
H A D | gv.c | 273 SVf_UTF8 * !!HEK_UTF8(CvNAME_HEK(cv))); in Perl_cvgv_from_hek() 353 flags |= SVf_UTF8; in Perl_gv_init_sv() 426 gv_name_set(gv, name, len, GV_ADD | ( flags & SVf_UTF8 ? SVf_UTF8 : 0 )); in Perl_gv_init_pvn() 653 if (SvUTF8(namesv)) flags |= SVf_UTF8; in Perl_gv_fetchmeth_sv() 717 U32 is_utf8 = flags & SVf_UTF8; in S_gv_fetchmeth_internal() 897 flags |= SVf_UTF8; in Perl_gv_fetchmeth_sv_autoload() 1008 flags |= SVf_UTF8; in Perl_gv_fetchmethod_sv_flags() 1179 flags |= SVf_UTF8; in Perl_gv_autoload_sv() 1199 U32 is_utf8 = flags & SVf_UTF8 ? SVf_UTF8 : 0; in Perl_gv_autoload_pvn() 1477 hv_name_set(stash, name, namelen, flags & SVf_UTF8 ? SVf_UTF8 : 0 ); in S_gv_stashpvn_internal() [all …]
|
H A D | hv.c | 374 ? SVf_UTF8 : 0)); in Perl_hv_common() 2462 if ( (HEK_UTF8(hek) ? 1 : 0) != (flags & SVf_UTF8 ? 1 : 0) ) { in hek_eq_pvn_flags() 2463 if (flags & SVf_UTF8) in hek_eq_pvn_flags() 2511 (HEK_UTF8(*hekp) || (flags & SVf_UTF8)) in Perl_hv_ename_add() 2529 (HEK_UTF8(existing_name) || (flags & SVf_UTF8)) in Perl_hv_ename_add() 2574 (HEK_UTF8(*victim) || (flags & SVf_UTF8)) in Perl_hv_ename_delete() 2598 count > 0 && ((HEK_UTF8(*namep) || (flags & SVf_UTF8)) in Perl_hv_ename_delete() 2607 (HEK_UTF8(aux->xhv_name_u.xhvnameu_name) || (flags & SVf_UTF8)) in Perl_hv_ename_delete() 3787 == HVrhek_PV_UTF8) ? SVf_UTF8 : 0; in Perl_cop_fetch_label() 3809 if (flags & ~(SVf_UTF8)) in Perl_cop_store_label() [all …]
|
H A D | universal.c | 55 if (hv_common(isa, NULL, name, len, ( flags & SVf_UTF8 ? HVhek_UTF8 : 0), in S_isa_lookup() 110 flags |= SVf_UTF8; in Perl_sv_derived_from_sv() 732 (SvUTF8(*argsvp) ? SVf_UTF8 : 0) in XS() 953 (RX_UTF8(re) ? SVf_UTF8 : 0) | SVs_TEMP); in XS()
|
/dports/lang/perl5.32/perl-5.32.1/ |
H A D | sv.h | 447 #define SVf_UTF8 0x20000000 /* SvPV is UTF-8 encoded macro 863 SVf_IVisUV|SVf_UTF8), \ 867 SVf_UTF8), \ 933 #define SvUTF8(sv) (SvFLAGS(sv) & SVf_UTF8) 934 #define SvUTF8_on(sv) (SvFLAGS(sv) |= (SVf_UTF8)) 935 #define SvUTF8_off(sv) (SvFLAGS(sv) &= ~(SVf_UTF8)) 943 SVf_IVisUV|SVf_UTF8), \ 1006 #define SvPOK_utf8_nog(sv) ((SvFLAGS(sv) & (SVf_POK|SVf_UTF8|SVs_GMG)) == (SVf_POK|SVf_UTF8)) 1007 …SvPOK_utf8_nogthink(sv) ((SvFLAGS(sv) & (SVf_POK|SVf_UTF8|SVf_THINKFIRST|SVs_GMG)) == (SVf_POK|SVf… 1015 …((SvFLAGS(sv) & (SVf_POK|SVf_UTF8|SVf_IOK|SVf_NOK|SVf_ROK|SVpgv_GP|SVf_THINKFIRST|SVs_GMG)) == (SV… [all …]
|
H A D | gv.c | 273 SVf_UTF8 * !!HEK_UTF8(CvNAME_HEK(cv))); in Perl_cvgv_from_hek() 355 flags |= SVf_UTF8; in Perl_gv_init_sv() 428 gv_name_set(gv, name, len, GV_ADD | ( flags & SVf_UTF8 ? SVf_UTF8 : 0 )); in Perl_gv_init_pvn() 656 if (SvUTF8(namesv)) flags |= SVf_UTF8; in Perl_gv_fetchmeth_sv() 723 U32 is_utf8 = flags & SVf_UTF8; in S_gv_fetchmeth_internal() 924 flags |= SVf_UTF8; in Perl_gv_fetchmeth_sv_autoload() 1035 flags |= SVf_UTF8; in Perl_gv_fetchmethod_sv_flags() 1206 flags |= SVf_UTF8; in Perl_gv_autoload_sv() 1226 U32 is_utf8 = flags & SVf_UTF8 ? SVf_UTF8 : 0; in Perl_gv_autoload_pvn() 1511 hv_name_set(stash, name, namelen, flags & SVf_UTF8 ? SVf_UTF8 : 0 ); in S_gv_stashpvn_internal() [all …]
|
H A D | hv.c | 374 ? SVf_UTF8 : 0)); in Perl_hv_common() 2462 if ( (HEK_UTF8(hek) ? 1 : 0) != (flags & SVf_UTF8 ? 1 : 0) ) { in hek_eq_pvn_flags() 2463 if (flags & SVf_UTF8) in hek_eq_pvn_flags() 2511 (HEK_UTF8(*hekp) || (flags & SVf_UTF8)) in Perl_hv_ename_add() 2529 (HEK_UTF8(existing_name) || (flags & SVf_UTF8)) in Perl_hv_ename_add() 2574 (HEK_UTF8(*victim) || (flags & SVf_UTF8)) in Perl_hv_ename_delete() 2598 count > 0 && ((HEK_UTF8(*namep) || (flags & SVf_UTF8)) in Perl_hv_ename_delete() 2607 (HEK_UTF8(aux->xhv_name_u.xhvnameu_name) || (flags & SVf_UTF8)) in Perl_hv_ename_delete() 3795 == HVrhek_PV_UTF8) ? SVf_UTF8 : 0; in Perl_cop_fetch_label() 3817 if (flags & ~(SVf_UTF8)) in Perl_cop_store_label() [all …]
|
/dports/lang/perl5.34/perl-5.34.0/ext/mro/ |
H A D | mro.xs | 381 | ((meta->kflags & HVhek_UTF8) ? SVf_UTF8 : 0)); 596 SVs_TEMP | ( subname_utf8 ? SVf_UTF8 : 0 ) )), 609 SVs_TEMP | (subname_utf8 ? SVf_UTF8 : 0)); 659 GV_ADDMULTI|(subname_utf8 ? SVf_UTF8 : 0)); 677 SVs_TEMP | ( subname_utf8 ? SVf_UTF8 : 0 ) )),
|
/dports/lang/perl5.30/perl-5.30.3/ext/mro/ |
H A D | mro.xs | 380 | ((meta->kflags & HVhek_UTF8) ? SVf_UTF8 : 0)); 595 SVs_TEMP | ( subname_utf8 ? SVf_UTF8 : 0 ) )), 608 SVs_TEMP | (subname_utf8 ? SVf_UTF8 : 0)); 658 GV_ADDMULTI|(subname_utf8 ? SVf_UTF8 : 0)); 676 SVs_TEMP | ( subname_utf8 ? SVf_UTF8 : 0 ) )),
|
/dports/lang/perl5.32/perl-5.32.1/ext/mro/ |
H A D | mro.xs | 380 | ((meta->kflags & HVhek_UTF8) ? SVf_UTF8 : 0)); 595 SVs_TEMP | ( subname_utf8 ? SVf_UTF8 : 0 ) )), 608 SVs_TEMP | (subname_utf8 ? SVf_UTF8 : 0)); 658 GV_ADDMULTI|(subname_utf8 ? SVf_UTF8 : 0)); 676 SVs_TEMP | ( subname_utf8 ? SVf_UTF8 : 0 ) )),
|
/dports/lang/perl5-devel/perl5-5.35.4-102-ge43d289c7c/ext/mro/ |
H A D | mro.xs | 372 | ((meta->kflags & HVhek_UTF8) ? SVf_UTF8 : 0)); 587 SVs_TEMP | ( subname_utf8 ? SVf_UTF8 : 0 ) )), 600 SVs_TEMP | (subname_utf8 ? SVf_UTF8 : 0)); 650 GV_ADDMULTI|(subname_utf8 ? SVf_UTF8 : 0)); 668 SVs_TEMP | ( subname_utf8 ? SVf_UTF8 : 0 ) )),
|
/dports/devel/p5-B-C/B-C-1.57/ |
H A D | C.xs | 283 ST(0) = sv_2mortal(newSVpvn_flags(RX_PRECOMP(rx), RX_PRELEN(rx), RX_UTF8(rx) ? SVf_UTF8 : 0)); in precomp() 320 HEK_UTF8(*hekp) ? SVf_UTF8|SVs_TEMP : SVs_TEMP)); 329 HEK_UTF8(hek) ? SVf_UTF8|SVs_TEMP : SVs_TEMP); 574 PUSHs(newSVpvn_flags(p, len, SVf_UTF8|SVs_TEMP)); 743 PUSHs(newSVpvn_flags(HeKEY(he), HeKLEN(he), SVf_UTF8|SVs_TEMP));
|
/dports/devel/p5-Sub-Name/Sub-Name-0.26/ |
H A D | Name.xs | 144 … sv_2mortal(newSVpvn_flags(HvNAME(oldhv), HvNAMELEN_get(oldhv), HvNAMEUTF8(oldhv) ? SVf_UTF8 : 0)); 151 … sv_2mortal(newSVpvn_flags(HvNAME(stash), HvNAMELEN_get(stash), HvNAMEUTF8(stash) ? SVf_UTF8 : 0));
|