Searched refs:hv (Results 1 - 25 of 40) sorted by relevance

12

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/
H A Dhv.h0 /* hv.h
92 /* Only hv.c and mod_perl should be doing this. */
179 #define HvARRAY(hv) (*(HE***)&((XPVHV*) SvANY(hv))->xhv_array)
180 #define HvFILL(hv) ((XPVHV*) SvANY(hv))->xhv_fill
181 #define HvMAX(hv) ((XPVHV*) SvANY(hv))->xhv_max
182 #define HvRITER(hv) ((XPVHV*) SvANY(hv))
[all...]
H A Dhv.c0 /* hv.c
172 /* (klen == HEf_SVKEY) is special for MAGICAL hv entries, meaning key slot
207 Perl_hv_store(pTHX_ HV *hv, const char *key, I32 klen_i32, SV *val, U32 hash) argument
220 hek = hv_fetch_common (hv, NULL, key, klen, flags,
226 Perl_hv_store_flags(pTHX_ HV *hv, const char *key, I32 klen, SV *val, argument
229 HE *hek = hv_fetch_common (hv, NULL, key, klen, flags,
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);
279 Perl_hv_exists(pTHX_ HV *hv, const char *key, I32 klen_i32) argument
291 return hv_fetch_common(hv, NUL
310 Perl_hv_fetch(pTHX_ HV *hv, const char *key, I32 klen_i32, I32 lval) argument
340 Perl_hv_exists_ent(pTHX_ HV *hv, SV *keysv, U32 hash) argument
366 Perl_hv_fetch_ent(pTHX_ HV *hv, SV *keysv, I32 lval, register U32 hash) argument
373 S_hv_fetch_common(pTHX_ HV *hv, SV *keysv, const char *key, STRLEN klen, int flags, int action, SV *val, register U32 hash) argument
783 S_hv_magic_check(pTHX_ HV *hv, bool *needs_copy, bool *needs_store) argument
810 Perl_hv_scalar(pTHX_ HV *hv) argument
842 Perl_hv_delete(pTHX_ HV *hv, const char *key, I32 klen_i32, I32 flags) argument
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
1049 S_hsplit(pTHX_ HV *hv) argument
1203 Perl_hv_ksplit(pTHX_ HV *hv, IV newmax) argument
1292 register HV *hv; local
1314 HV *hv = newHV(); local
1390 Perl_hv_free_ent(pTHX_ HV *hv, register HE *entry) argument
1412 Perl_hv_delayfree_ent(pTHX_ HV *hv, register HE *entry) argument
1439 Perl_hv_clear(pTHX_ HV *hv) argument
1501 Perl_hv_clear_placeholders(pTHX_ HV *hv) argument
1548 S_hfreeentries(pTHX_ HV *hv) argument
1596 Perl_hv_undef(pTHX_ HV *hv) argument
1634 Perl_hv_iterinit(pTHX_ HV *hv) argument
1669 Perl_hv_iternext(pTHX_ HV *hv) argument
1690 Perl_hv_iternext_flags(pTHX_ HV *hv, I32 flags) argument
1874 Perl_hv_iterval(pTHX_ HV *hv, register HE *entry) argument
1898 Perl_hv_iternextsv(pTHX_ HV *hv, char **key, I32 *retlen) argument
1916 Perl_hv_magic(pTHX_ HV *hv, GV *gv, int how) argument
[all...]
H A Dscope.c350 HV *ohv, *hv; local
358 hv = GvHVn(gv);
360 SvMAGIC(hv) = SvMAGIC(ohv);
361 SvFLAGS((SV*)hv) |= SvMAGICAL(ohv);
365 SvSETMAGIC((SV*)hv);
368 return hv;
570 Perl_save_delete(pTHX_ HV *hv, char *key, I32 klen) argument
575 SSPUSHPTR(SvREFCNT_inc(hv));
636 Perl_save_helem(pTHX_ HV *hv, SV *key, SV **sptr) argument
640 SSPUSHPTR(SvREFCNT_inc(hv));
686 register HV *hv; local
[all...]
H A Duniversal.c37 HV* hv = Nullhv; local
58 && (hv = GvHV(gv)))
62 SV** svp = (SV**)hv_fetch(hv, name, len, FALSE);
72 hv_clear(hv);
80 if (!hv || !subgen) {
88 if (!hv)
89 hv = GvHVn(gv);
95 if (hv) {
111 (void)hv_store(hv,name,len,&PL_sv_yes,0);
115 (void)hv_store(hv,nam
548 HV *hv = (HV *) SvRV(ST(0)); local
705 HV *hv = (HV *) SvRV(ST(0)); local
[all...]
H A Dcop.h60 # define CopSTASH_set(c,hv) CopSTASHPV_set(c, (hv) ? HvNAME(hv) : Nullch)
61 # define CopSTASH_eq(c,hv) ((hv) \
62 && (CopSTASHPV(c) == HvNAME(hv) \
63 || (CopSTASHPV(c) && HvNAME(hv) \
64 && strEQ(CopSTASHPV(c), HvNAME(hv)))))
84 # define CopSTASH_set(c,hv) ((c)->cop_stash = (hv))
[all...]
H A Ddoop.c306 HV* hv = (HV*)SvRV(rv); local
307 SV** svp = hv_fetch(hv, "NONE", 4, FALSE);
330 svp = hv_fetch(hv, "FINAL", 5, FALSE);
401 HV* hv = (HV*)SvRV(rv); local
402 SV** svp = hv_fetch(hv, "NONE", 4, FALSE);
443 HV* hv = (HV*)SvRV(rv); local
444 SV** svp = hv_fetch(hv, "NONE", 4, FALSE);
470 svp = hv_fetch(hv, "FINAL", 5, FALSE);
954 HV* hv = (HV*)sv; local
956 (void)hv_iterinit(hv);
1032 HV* hv = (HV*)sv; local
1336 HV *hv = (HV*)POPs; local
[all...]
H A Dop.h316 # define PmopSTASH_set(o,hv) PmopSTASHPV_set(o, ((hv) ? HvNAME(hv) : Nullch))
321 # define PmopSTASH_set(o,hv) ((o)->op_pmstash = (hv))
H A Dpp.c3764 HV *hv; local
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)
3829 HV *hv; local
3865 register HV *hv = (HV*)POPs; local
4016 HV* hv = (HV*)sv_2mortal((SV*)newHV()); local
[all...]
H A Dpp_hot.c771 HV *hv; local
778 hv = (HV*)SvRV(sv);
779 if (SvTYPE(hv) != SVt_PVHV && SvTYPE(hv) != SVt_PVAV)
782 SETs((SV*)hv);
788 SETs((SV*)hv);
797 hv = (HV*)sv;
799 SETs((SV*)hv);
806 SETs((SV*)hv);
855 hv
1702 HV *hv = (HV*)POPs; local
[all...]
H A Dgv.c856 HV* hv = GvHVn(gv); local
858 hv_magic(hv, Nullgv, PERL_MAGIC_overload);
863 HV *hv; local
871 hv = GvHVn(gv);
872 hv_magic(hv, Nullgv, PERL_MAGIC_sig);
875 init = hv_fetch(hv, PL_sig_name[i], strlen(PL_sig_name[i]), 1);
1085 HV *hv = GvSTASH(gv); local
1086 if (!hv) {
1091 if (keepmain || strNE(HvNAME(hv), "main")) {
1092 sv_catpv(sv,HvNAME(hv));
1160 HV *hv; local
[all...]
H A Ddump.c57 HV *hv; local
65 && (hv = GvHV(gv)) && hv != PL_defstash)
66 dump_packsubs(hv); /* nested package */
1291 HV *hv = (HV*)sv; local
1294 hv_iterinit(hv);
1295 while ((he = hv_iternext_flags(hv, HV_ITERNEXT_WANTPLACEHOLDERS))
1304 elt = hv_iterval(hv, he);
1313 hv_iterinit(hv); /* Return to status quo */
H A Dutf8.c1408 HV *hv; local
1411 if ((hv = get_hv(special, FALSE)) &&
1412 (svp = hv_fetch(hv, (const char*)tmpbuf, UNISKIP(uv1), FALSE)) &&
1634 HV* hv = (HV*)SvRV(sv); local
1682 if (hv == PL_last_swash_hv &&
1691 SV** svp = hv_fetch(hv, (char*)ptr, klen, FALSE);
1729 svp = hv_store(hv, (char*)ptr, klen, retval, 0);
1735 PL_last_swash_hv = hv;
/osnet-11/usr/src/cmd/sendmail/src/
H A Dratectrl.c227 unsigned int hv; local
235 hv = 0xABC3D20F;
278 hv = (hv << 5) ^ (hv >> 23) ^ *p;
279 hv = (hv ^ (hv >> 16));
285 hv += (c<<11) ^ (c>>1);
286 hv
[all...]
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Devel/Peek/
H A DPeek.xs177 _mstats_to_hv(HV *hv, struct mstats_buffer *b, int level)
183 svp = hv_fetch(hv, "topbucket", 9, 1);
186 svp = hv_fetch(hv, "topbucket_ev", 12, 1);
189 svp = hv_fetch(hv, "topbucket_odd", 13, 1);
192 svp = hv_fetch(hv, "totfree", 7, 1);
195 svp = hv_fetch(hv, "total", 5, 1);
198 svp = hv_fetch(hv, "total_chain", 11, 1);
201 svp = hv_fetch(hv, "total_sbrk", 10, 1);
204 svp = hv_fetch(hv, "sbrks", 5, 1);
207 svp = hv_fetch(hv, "sbrk_goo
[all...]
/osnet-11/usr/src/lib/libpkg/common/
H A Dnhash.c57 int hv = 0; local
67 hv += ((int)*cp++);
72 return (hv % hsz);
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Data/Dumper/
H A DDumper.xs922 HV *hv;
971 && (hv = (HV*)SvRV((SV*)href))
972 && SvTYPE(hv) == SVt_PVHV) {
974 if ((svp = hv_fetch(hv, "seen", 4, FALSE)) && SvROK(*svp))
976 if ((svp = hv_fetch(hv, "todump", 6, FALSE)) && SvROK(*svp))
978 if ((svp = hv_fetch(hv, "names", 5, FALSE)) && SvROK(*svp))
980 if ((svp = hv_fetch(hv, "indent", 6, FALSE)))
982 if ((svp = hv_fetch(hv, "purity", 6, FALSE)))
984 if ((svp = hv_fetch(hv, "terse", 5, FALSE)))
987 if ((svp = hv_fetch(hv, "useq
[all...]
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/B/B/
H A DBytecode.pm148 my $hv = shift;
149 my $ix = $svtab{$$hv};
152 my $name = $hv->NAME;
156 asm "sv_flags", $hv->FLAGS;
157 $svtab{$$hv} = $varix = $ix = $tix++;
159 # my $pmrootix = $hv->PMROOT->ix; # XXX
164 asm "newsvx", $hv->FLAGS;
165 $svtab{$$hv} = $varix = $ix = $tix++;
166 my $stashix = $hv->SvSTASH->ix;
167 for (@array = $hv
[all...]
H A DC.pm1248 my ($hv) = @_;
1249 my $sym = objsym($hv);
1251 my $name = $hv->NAME;
1258 #my $adpmroot = ${$hv->PMROOT};
1260 $decl->add("static HV *hv$hv_index;");
1262 $init->add(qq[hv$hv_index = gv_stashpv("$name", TRUE);]);
1264 $init->add(sprintf("HvPMROOT(hv$hv_index) = (PMOP*)s\\_%x;",
1267 $sym = savesym($hv, "hv$hv_index");
1273 $hv
[all...]
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Storable/
H A DStorable.xs72 #define HvSHAREKEYS_off(hv) /* Ignore */
1023 static int store_hash(pTHX_ stcxt_t *cxt, HV *hv);
2150 * Key flags are as for hv.h
2152 static int store_hash(pTHX_ stcxt_t *cxt, HV *hv)
2156 HvTOTALKEYS(hv);
2158 HvKEYS(hv);
2164 int flagged_hash = ((SvREADONLY(hv)
2166 || HvHASKFLAGS(hv)
2169 unsigned char hash_flags = (SvREADONLY(hv) ? SHV_RESTRICTED : 0);
2173 TRACEME(("store_hash (0x%"UVxf") (flags %x)", PTR2UV(hv),
[all...]
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Opcode/
H A DOpcode.xs266 HV *hv;
269 hv = gv_stashpv(Package, GV_ADDWARN); /* should exist already */
271 if (strNE(HvNAME(hv),"main")) {
272 Safefree(HvNAME(hv));
273 HvNAME(hv) = savepv("main"); /* make it think it's in main:: */
274 hv_store(hv,"_",1,(SV *)PL_defgv,0); /* connect _ to global */
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/XS/Typemap/
H A DTypemap.xs128 T_HVREF( hv )
129 HV * hv
131 RETVAL = hv;
/osnet-11/usr/src/lib/brand/solaris/zone/
H A Dp2v.ksh165 for i in $(egrep -hv "^#" \
181 for i in $(egrep -hv "^#" /usr/lib/brand/solaris/pkgrm.lst \
/osnet-11/usr/src/cmd/perl/contrib/Sun/Solaris/Exacct/
H A DExacct.xs176 HV *hv;
179 hv = (HV *)SvRV(*svp);
180 PERL_ASSERT(hv != NULL);
181 svp = hv_fetch(hv, "value", 5, FALSE);
/osnet-11/usr/src/lib/libc/port/i18n/
H A Dgettext_util.c341 uint32_t hv, hidx; local
369 hv = get_hashid(ms, NULL);
370 hidx = search_msg(p, ms, hv, m);
388 hv = get_hashid(ms, NULL);
389 hidx = search_msg(p, ms, hv, m);
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/XS/APItest/
H A DAPItest.pm144 Hugo van der Sanden E<lt>hv@crypt.compulink.co.ukE<gt>

Completed in 88 milliseconds

12