Lines Matching defs:hv
3764 HV *hv;
3769 hv = (HV*)POPs;
3770 hvtype = SvTYPE(hv);
3773 sv = hv_delete_ent(hv, *MARK, discard, 0);
3780 sv = av_delete((AV*)hv, SvIV(*MARK), discard);
3786 sv = avhv_delete_ent((AV*)hv, *MARK, discard, 0);
3806 hv = (HV*)POPs;
3807 if (SvTYPE(hv) == SVt_PVHV)
3808 sv = hv_delete_ent(hv, keysv, discard, 0);
3809 else if (SvTYPE(hv) == SVt_PVAV) {
3811 sv = av_delete((AV*)hv, SvIV(keysv), discard);
3813 sv = avhv_delete_ent((AV*)hv, keysv, discard, 0);
3829 HV *hv;
3835 cv = sv_2cv(sv, &hv, &gv, FALSE);
3843 hv = (HV*)POPs;
3844 if (SvTYPE(hv) == SVt_PVHV) {
3845 if (hv_exists_ent(hv, tmpsv, 0))
3848 else if (SvTYPE(hv) == SVt_PVAV) {
3850 if (av_exists((AV*)hv, SvIV(tmpsv)))
3853 else if (avhv_exists_ent((AV*)hv, tmpsv, 0)) /* pseudo-hash element */
3865 register HV *hv = (HV*)POPs;
3867 I32 realhv = (SvTYPE(hv) == SVt_PVHV);
3875 other_magic = mg_find((SV*)hv, PERL_MAGIC_env) ||
3876 ((mg = mg_find((SV*)hv, PERL_MAGIC_tied))
3880 && (stash = SvSTASH(SvRV(SvTIED_obj((SV*)hv, mg))))
3888 if (realhv || SvTYPE(hv) == SVt_PVAV) {
3895 preeminent = SvRMAGICAL(hv) && !other_magic ? 1 :
3896 realhv ? hv_exists_ent(hv, keysv, 0)
3897 : avhv_exists_ent((AV*)hv, keysv, 0);
3901 HE *he = hv_fetch_ent(hv, keysv, lval, 0);
3905 svp = avhv_fetch_ent((AV*)hv, keysv, lval, 0);
3914 save_helem(hv, keysv, svp);
3918 SAVEDELETE(hv, savepvn(key,keylen), keylen);
4016 HV* hv = (HV*)sv_2mortal((SV*)newHV());
4025 (void)hv_store_ent(hv,key,val,0);
4028 XPUSHs((SV*)hv);