Searched refs:PL_last_in_gv (Results 1 - 10 of 10) sorted by relevance

/opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/
H A Dpp_hot.c219 PL_last_in_gv = (GV*)(*PL_stack_sp--);
220 if (SvTYPE(PL_last_in_gv) != SVt_PVGV) {
221 if (SvROK(PL_last_in_gv) && SvTYPE(SvRV(PL_last_in_gv)) == SVt_PVGV)
222 PL_last_in_gv = (GV*)SvRV(PL_last_in_gv);
225 XPUSHs((SV*)PL_last_in_gv);
228 PL_last_in_gv = (GV*)(*PL_stack_sp--);
1481 register IO *io = GvIO(PL_last_in_gv);
1508 if (av_len(GvAVn(PL_last_in_gv)) <
[all...]
H A Dmg.c798 if (GvIO(PL_last_in_gv)) {
799 sv_setiv(sv, (IV)IoLINES(GvIOp(PL_last_in_gv)));
2190 SAVESPTR(PL_last_in_gv);
2192 else if (SvOK(sv) && GvIO(PL_last_in_gv))
2193 IoLINES(GvIOp(PL_last_in_gv)) = SvIV(sv);
H A Dpp_sys.c400 SAVESPTR(PL_last_in_gv); /* We don't want this to be permanent. */
401 PL_last_in_gv = (GV*)*PL_stack_sp--;
418 PL_last_in_gv = cGVOP_gv;
1927 gv = PL_last_in_gv = GvEGV(PL_argvgv);
1942 gv = PL_last_in_gv; /* eof */
1945 gv = PL_last_in_gv = (GV*)POPs; /* eof(FH) */
1972 gv = PL_last_in_gv;
1974 gv = PL_last_in_gv = (GV*)POPs;
2015 gv = PL_last_in_gv = (GV*)POPs;
2247 gv = PL_last_in_gv;
[all...]
H A Dperlapi.h781 #undef PL_last_in_gv
782 #define PL_last_in_gv (*Perl_Tlast_in_gv_ptr(aTHX))
H A Dutil.c969 if (GvIO(PL_last_in_gv) && IoLINES(GvIOp(PL_last_in_gv))) {
973 PL_last_in_gv == PL_argvgv ?
974 "" : GvNAME(PL_last_in_gv),
976 (IV)IoLINES(GvIOp(PL_last_in_gv)));
3103 PL_last_in_gv = Nullgv;
H A Dembedvar.h72 #define PL_last_in_gv (vTHX->Tlast_in_gv) macro
1181 #define PL_last_in_gv (aTHX->Tlast_in_gv) macro
1321 #define PL_Tlast_in_gv PL_last_in_gv
H A Dpp_ctl.c986 if (GvIO(PL_last_in_gv)) {
987 flip = SvIV(sv) == (IV)IoLINES(GvIOp(PL_last_in_gv));
1081 if (GvIO(PL_last_in_gv)) {
1082 flop = SvIV(sv) == (IV)IoLINES(GvIOp(PL_last_in_gv));
H A Ddoio.c2381 (void)do_open(PL_last_in_gv, SvPVX(tmpcmd), SvCUR(tmpcmd),
H A Dperl.c741 PL_last_in_gv = Nullgv;
H A Dsv.c11308 PL_last_in_gv = gv_dup(proto_perl->Tlast_in_gv, param);

Completed in 300 milliseconds