if (SvTYPE(hv) == SVt_PVHV) {
if (hv_exists_ent(hv, tmpsv, 0))
RETPUSHYES;
}
####
entry = ((HE**)xhv->xhv_array)[hash & (I32) xhv->xhv_max];
for (; entry; entry = HeNEXT(entry)) {
if (HeHASH(entry) != hash) /* strings can't be equal */ continue;
if (HeKLEN(entry) != klen) continue;
* if (memNE(HeKEY(entry),key,klen)) /* is this it? */
* continue;
* return TRUE;
}
####
pp.h:#define RETPUSHYES RETURNX(PUSHs(&PL_sv_yes))
pp.h:#define RETURNX(x) return x, PUTBACK, NORMAL
pp.h:#define PUSHs(s) (*++sp = (s))
perlapi.h:#define PL_sv_yes (*Perl_Isv_yes_ptr(aTHXo))
pp.h:#define NORMAL PL_op->op_next
pp.h:#define PUTBACK PL_stack_sp = sp
####
return ( *++sp = ( &( *Perl_Isv_yes_ptr( aTHXo ) ) ) )
, PL_stack_sp = sp
, PL_op->op_next;
####
if (SvTYPE(hv) == SVt_PVHV) {
SV* sv;
if (sv = hv_exists_ent(hv, tmpsv, 0))
RETURNX(sv);
}