/openbsd/gnu/usr.bin/perl/ |
H A D | hv.h | 352 (HvHasNAME(hv) ? HEK_KEY(HvNAME_HEK_NN(hv)) : NULL) 373 (HvHasENAME(hv) ? HEK_KEY(HvENAME_HEK_NN(hv)) : NULL) 423 #define HeKEY(he) HEK_KEY(HeKEY_hek(he)) 459 #define HEK_KEY(hek) (hek)->hek_key macro 460 #define HEK_FLAGS(hek) (*((unsigned char *)(HEK_KEY(hek))+HEK_LEN(hek)+1)) 502 #define Perl_sharepvn(pv, len, hash) HEK_KEY(share_hek(pv, len, hash)) 569 hv_common((hv), NULL, HEK_KEY(hek), HEK_LEN(hek), HEK_UTF8(hek), \ 573 hv_common((hv), NULL, HEK_KEY(hek), HEK_LEN(hek), HEK_UTF8(hek), \ 579 hv_common((hv), NULL, HEK_KEY(hek), HEK_LEN(hek), HEK_UTF8(hek), \ 582 cBOOL(hv_common((hv), NULL, HEK_KEY(hek), HEK_LEN(hek), HEK_UTF8(hek), \
|
H A D | hv.c | 190 Copy(str, HEK_KEY(hek), len, char); in S_save_hek_flags() 191 HEK_KEY(hek)[len] = 0; in S_save_hek_flags() 236 = share_hek_flags(HEK_KEY(source), HEK_LEN(source), in Perl_hek_dup() 286 = share_hek_flags(HEK_KEY(source), HEK_LEN(source), in Perl_he_dup() 2715 (const U8*)HEK_KEY(hek), HEK_LEN(hek), in hek_eq_pvn_flags() 2723 return HEK_LEN(hek) == pvlen && ((HEK_KEY(hek) == pv) in hek_eq_pvn_flags() 2724 || memEQ(HEK_KEY(hek), pv, pvlen)); in hek_eq_pvn_flags() 3320 hek ? HEK_KEY(hek) : str, in S_unshare_hek_or_pvn() 3421 Copy(str, HEK_KEY(hek), len, char); in S_share_hek_flags() 3422 HEK_KEY(hek)[len] = 0; in S_share_hek_flags() [all …]
|
H A D | gv.h | 57 # define GvNAME_get(gv) ({ assert(GvNAME_HEK(gv)); (char *)HEK_KEY(GvNAME_HEK(gv)); }) 66 # define GvNAME_get(gv) HEK_KEY(GvNAME_HEK(gv)) 146 #define GvFILEx(gv) HEK_KEY(GvFILE_HEK(gv))
|
H A D | mro_core.c | 468 (void) hv_common(isa_hash, NULL, HEK_KEY(canon_name), in Perl_mro_get_linear_isa() 617 HV* const revstash = *(HV **)HEK_KEY(HeKEY_hek(iter)); in Perl_mro_isa_changed_in() 656 isa, HEK_KEY(namehek), HEK_LEN(namehek), in Perl_mro_isa_changed_in() 811 if (memEQs(HEK_KEY(*namep), HEK_LEN(*namep), "main")) { in Perl_mro_package_moved() 833 if(memEQs(HEK_KEY(*namep), HEK_LEN(*namep), "main")){ in Perl_mro_package_moved() 878 HV * const this_stash = *(HV **)HEK_KEY(HeKEY_hek(iter)); in Perl_mro_package_moved()
|
H A D | gv.c | 302 gv_init_pvn(gv, CvSTASH(cv), HEK_KEY(CvNAME_HEK(cv)), in Perl_cvgv_from_hek() 524 && memEQ(HEK_KEY(CvNAME_HEK(cv)), GvNAME(gv), GvNAMELEN(gv)) in Perl_gv_init_pvn() 3232 if (memEQs(HEK_KEY(gvhek), HEK_LEN(gvhek), "nil") in Perl_Gv_AMupdate() 3234 && memEQs(HEK_KEY(stashek), HEK_LEN(stashek), "overload")) { in Perl_Gv_AMupdate()
|
H A D | sv.c | 3008 stashname = HEK_KEY(name); in Perl_sv_2pv_flags() 5163 sv_setsv(sv, *(SV**)HEK_KEY(hek)); 5169 char *as_utf8 = (char *)bytes_to_utf8((U8*)HEK_KEY(hek), &utf8_len); 5174 sv_setpvn(sv, HEK_KEY(hek), HEK_LEN(hek)); 5184 SvPV_set(sv,(char *)HEK_KEY(share_hek_hek(hek))); 9770 return newSVsv(*(SV**)HEK_KEY(hek)); 9789 SV * const sv = newSVpvn (HEK_KEY(hek), HEK_LEN(hek)); 9800 SvPV_set(sv, (char *)HEK_KEY(share_hek_hek(hek))); 12824 eptr = HEK_KEY(hek); 14617 dsv = MUTABLE_SV(gv_stashpvn(HEK_KEY(hvname), HEK_LEN(hvname), [all …]
|
H A D | universal.c | 76 if (hv_common(isa, NULL, HEK_KEY(canon_name), HEK_LEN(canon_name), in S_isa_lookup()
|
H A D | dump.c | 2292 … generic_pv_escape(tmp, HEK_KEY(*hekp), HEK_LEN(*hekp), HEK_UTF8(*hekp))); in Perl_do_sv_dump() 2457 HEK_KEY(CvNAME_HEK((CV *)sv))); in Perl_do_sv_dump()
|
H A D | sv.h | 2250 sv_catpvn_flags(sv, HEK_KEY(bmxk), HEK_LEN(bmxk), \
|
H A D | pp.c | 565 || (len == 1 && HEK_KEY(hek)[0] == '0') in PP() 7919 if(UNLIKELY(len == HEf_SVKEY || (len == 1 && HEK_KEY(hek)[0] == '0'))) in PP()
|
H A D | util.c | 6714 func = HEK_KEY(hek);
|
/openbsd/gnu/usr.bin/perl/dist/Devel-PPPort/parts/base/ |
H A D | 5004000 | 66 HEK_KEY # Z added by devel/scanprov
|
/openbsd/gnu/usr.bin/perl/dist/Storable/ |
H A D | Storable.xs | 3093 key_sv = (SV *)HEK_KEY(hek); in store_hentry() 3103 key = HEK_KEY(hek); in store_hentry()
|