Lines Matching refs:tmpgv
4014 GV *tmpgv;
4023 tmpgv = gv_fetchpv("stdin",TRUE, SVt_PV);
4024 GvMULTI_on(tmpgv);
4025 GvIOp(tmpgv) = (IO*)SvREFCNT_inc(io);
4027 tmpgv = gv_fetchpv("STDOUT",TRUE, SVt_PVIO);
4028 GvMULTI_on(tmpgv);
4029 io = GvIOp(tmpgv);
4032 setdefout(tmpgv);
4033 tmpgv = gv_fetchpv("stdout",TRUE, SVt_PV);
4034 GvMULTI_on(tmpgv);
4035 GvIOp(tmpgv) = (IO*)SvREFCNT_inc(io);
4042 tmpgv = gv_fetchpv("stderr",TRUE, SVt_PV);
4043 GvMULTI_on(tmpgv);
4044 GvIOp(tmpgv) = (IO*)SvREFCNT_inc(io);
4131 GV* tmpgv;
4145 if ((tmpgv = gv_fetchpv("0",TRUE, SVt_PV))) {
4148 sv_setpv(GvSV(tmpgv),MacPerl_MPWFileName(PL_origfilename));
4150 sv_setpv(GvSV(tmpgv),PL_origfilename);
4154 if ((tmpgv = gv_fetchpv("\030",TRUE, SVt_PV))) {/* $^X */
4156 S_procself_val(aTHX_ GvSV(tmpgv), PL_origargv[0]);
4159 sv_setpv(GvSV(tmpgv), os2_execname(aTHX));
4161 sv_setpv(GvSV(tmpgv),PL_origargv[0]);
4205 if ((tmpgv = gv_fetchpv("$",TRUE, SVt_PV))) {
4206 SvREADONLY_off(GvSV(tmpgv));
4207 sv_setiv(GvSV(tmpgv), (IV)PerlProc_getpid());
4208 SvREADONLY_on(GvSV(tmpgv));