Cross Reference: /osnet-11/usr/src/cmd/perl/5.8.4/distrib/sv.c

Lines Matching defs:stash
1284     HV*		stash = Nullhv;
1304 	stash	= 0;
1314 	stash	= 0;
1327 	stash	= 0;
1341 	stash	= 0;
1350 	stash	= 0;
1364 	stash	= 0;
1374 	stash	= 0;
1384 	stash	= SvSTASH(sv);
1438 	SvSTASH(sv)	= stash;
1448 	SvSTASH(sv)	= stash;
1464 	SvSTASH(sv)	= stash;
1479 	SvSTASH(sv)	= stash;
1494 	SvSTASH(sv)	= stash;
1504 	SvSTASH(sv)	= stash;
1519 	SvSTASH(sv)	= stash;
1533 	SvSTASH(sv)	= stash;
1544 	SvSTASH(sv)	= stash;
5095     HV* stash;
5107 		stash = SvSTASH(sv);
5108 		destructor = StashHANDLER(stash,DESTROY);
5132 	    } while (SvOBJECT(sv) && SvSTASH(sv) != stash);
5138 			  HvNAME(stash));
5157     stash = NULL;
5198 	/* cannot decrease stash refcount yet, as we might recursively delete
5200 	   of stash until current sv is completely gone.
5202 	stash = GvSTASH(sv);
5276 	/* decrease refcount of the stash that owns this GV, if any */
5277 	if (stash)
5278 	    SvREFCNT_dec(stash);
7077 Perl_sv_reset(pTHX_ register char *s, HV *stash)
7087     if (!stash)
7091 	for (pm = HvPMROOT(stash); pm; pm = pm->op_pmnext) {
7099     if (!HvARRAY(stash))
7112 	for (i = 0; i <= (I32) HvMAX(stash); i++) {
7113 	    for (entry = HvARRAY(stash)[i];
7204 possible to set C<*st> and C<*gvp> to the stash and GV associated with it.
7734 	HV* stash = gv_stashpv(classname, TRUE);
7735 	(void)sv_bless(rv, stash);
7853 must be designated by its stash (see C<gv_stashpv()>).  The reference count
7860 Perl_sv_bless(pTHX_ SV *sv, HV *stash)
7879     SvSTASH(tmpRef) = (HV*)SvREFCNT_inc(stash);
7881     if (Gv_AMG(stash))
11425         HV* stash = (HV*) av_shift(param->stashes);
11426 	GV* cloner = gv_fetchmethod_autoload(stash, "CLONE", 0);
11432            XPUSHs(sv_2mortal(newSVpv(HvNAME(stash), 0)));