Select Code to Download

Select or download this

    if (SvTYPE(hv) == SVt_PVHV) {
        if (hv_exists_ent(hv, tmpsv, 0))
            RETPUSHYES;
    }

Select or download this

    entry = ((HE**)xhv->xhv_array)[hash & (I32) xhv->xhv_max];
    for (; entry; entry = HeNEXT(entry)) {
...
*        continue;
*        return TRUE;
    }

Select or download this

pp.h:#define RETPUSHYES RETURNX(PUSHs(&PL_sv_yes))
pp.h:#define RETURNX(x) return x, PUTBACK, NORMAL
...

pp.h:#define NORMAL PL_op->op_next
pp.h:#define PUTBACK            PL_stack_sp = sp

Select or download this

return ( *++sp = ( &( *Perl_Isv_yes_ptr( aTHXo ) ) ) )
    , PL_stack_sp = sp
    , PL_op->op_next;

Select or download this

    if (SvTYPE(hv) == SVt_PVHV) {
                SV* sv;
        if (sv = hv_exists_ent(hv, tmpsv, 0))
            RETURNX(sv);
    }