/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ |
H A D | av.c | 946 S_avhv_index(pTHX_ AV *av, SV *keysv, U32 hash) argument 953 he = hv_fetch_ent(keys, keysv, FALSE, hash); 955 Perl_croak(aTHX_ "No such pseudo-hash field \"%s\"", SvPV(keysv,n_a)); 981 Perl_avhv_store_ent(pTHX_ AV *av, SV *keysv, SV *val, U32 hash) argument 983 return av_store(av, avhv_index(av, keysv, hash), val); 987 Perl_avhv_fetch_ent(pTHX_ AV *av, SV *keysv, I32 lval, U32 hash) argument 989 return av_fetch(av, avhv_index(av, keysv, hash), lval); 993 Perl_avhv_delete_ent(pTHX_ AV *av, SV *keysv, I32 flags, U32 hash) argument 998 he = hv_fetch_ent(keys, keysv, FALSE, hash); 1009 Perl_avhv_exists_ent(pTHX_ AV *av, SV *keysv, U3 argument [all...] |
H A D | dump.c | 1297 SV *elt, *keysv; local 1302 keysv = hv_iterkeysv(he); 1303 keypv = SvPV(keysv, len); 1306 if (SvUTF8(keysv)) 1307 PerlIO_printf(file, "[UTF8 \"%s\"] ", sv_uni_display(d, keysv, 8 * sv_len_utf8(keysv), UNI_DISPLAY_QQ));
|
H A D | pp_hot.c | 1701 SV *keysv = POPs; local 1706 U32 hash = (SvFAKE(keysv) && SvREADONLY(keysv)) ? SvUVX(keysv) : 0; 1726 ) ? hv_exists_ent(hv, keysv, 0) : 1; 1729 he = hv_fetch_ent(hv, keysv, lval && !defer, hash); 1735 svp = avhv_fetch_ent((AV*)hv, keysv, lval && !defer, hash); 1746 DIE(aTHX_ PL_no_helem, SvPV(keysv, n_a)); 1751 sv_magic(lv, key2 = newSVsv(keysv), PERL_MAGIC_defelem, Nullch, 0); 1764 char *key = SvPV(keysv, keyle [all...] |
H A D | hv.c | 264 Perl_hv_store_ent(pTHX_ HV *hv, SV *keysv, SV *val, U32 hash) argument 266 return hv_fetch_common(hv, keysv, NULL, 0, 0, HV_FETCH_ISSTORE, val, hash); 340 Perl_hv_exists_ent(pTHX_ HV *hv, SV *keysv, U32 hash) argument 342 return hv_fetch_common(hv, keysv, NULL, 0, 0, HV_FETCH_ISEXISTS, 0, hash) 366 Perl_hv_fetch_ent(pTHX_ HV *hv, SV *keysv, I32 lval, register U32 hash) argument 368 return hv_fetch_common(hv, keysv, NULL, 0, 0, 373 S_hv_fetch_common(pTHX_ HV *hv, SV *keysv, const char *key, STRLEN klen, argument 387 if (keysv) { 390 key = SvPV(keysv, klen); 392 is_utf8 = (SvUTF8(keysv) ! 868 Perl_hv_delete_ent(pTHX_ HV *hv, SV *keysv, I32 flags, U32 hash) argument 874 S_hv_delete_common(pTHX_ HV *hv, SV *keysv, const char *key, STRLEN klen, int k_flags, I32 d_flags, U32 hash) argument 1457 SV* keysv = hv_iterkeysv(entry); local [all...] |
H A D | pp.c | 3805 SV *keysv = POPs; local 3808 sv = hv_delete_ent(hv, keysv, discard, 0); 3811 sv = av_delete((AV*)hv, SvIV(keysv), discard); 3813 sv = avhv_delete_ent((AV*)hv, keysv, discard, 0); 3890 SV *keysv = *MARK; local 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); 3910 DIE(aTHX_ PL_no_helem, SvPV(keysv, n_ [all...] |
H A D | op.c | 6830 SV* keysv; local 6836 keysv = sv_2mortal(newSViv(index)); 6838 he = hv_fetch_ent(PL_custom_op_names, keysv, 0, 0); 6848 SV* keysv; local 6854 keysv = sv_2mortal(newSViv(index)); 6856 he = hv_fetch_ent(PL_custom_op_descs, keysv, 0, 0);
|