Searched defs:subgen (Results 1 - 1 of 1) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/
H A Duniversal.c38 SV* subgen = Nullsv; local
57 if (gvp && (gv = *gvp) != (GV*)&PL_sv_undef && (subgen = GvSV(gv))
60 if (SvIV(subgen) == (IV)PL_sub_generation) {
73 sv_setiv(subgen, PL_sub_generation);
80 if (!hv || !subgen) {
90 if (!subgen) {
91 subgen = newSViv(PL_sub_generation);
92 GvSV(gv) = subgen;

Completed in 16 milliseconds