Home
last modified time | relevance | path

Searched refs:varsv (Results 1 – 2 of 2) sorted by relevance

/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/
H A Dgv.c483 SV* varsv; in Perl_gv_autoload4() local
543 varsv = GvSV(vargv); in Perl_gv_autoload4()
545 sv_lock(varsv); in Perl_gv_autoload4()
547 sv_setpv(varsv, packname); in Perl_gv_autoload4()
548 sv_catpvn(varsv, "::", 2); in Perl_gv_autoload4()
549 sv_catpvn(varsv, name, len); in Perl_gv_autoload4()
550 SvTAINTED_off(varsv); in Perl_gv_autoload4()
H A Dpp_sys.c778 SV *varsv; in PP() local
787 varsv = *++MARK; in PP()
788 switch(SvTYPE(varsv)) { in PP()
791 HvEITER((HV *)varsv) = Null(HE *); in PP()
798 if (GvUNIQUE((GV*)varsv)) { in PP()
806 if (!GvIOp(varsv)) in PP()
807 GvIOp(varsv) = newIO(); in PP()
808 varsv = (SV *)GvIOp(varsv); in PP()
849 sv_unmagic(varsv, how); in PP()
851 if (varsv == SvRV(sv) && in PP()
[all …]