Searched defs:tmpgv (Results 1 - 5 of 5) sorted by relevance
| /osnet-11/usr/src/cmd/perl/5.8.4/distrib/ |
| H A D | gv.c | 600 GV *tmpgv; local
610 tmpgv = gv_fetchpv(tmpbuf, create, SVt_PVHV);
613 if (!tmpgv)
615 if (!GvHV(tmpgv))
616 GvHV(tmpgv) = newHV();
617 stash = GvHV(tmpgv);
|
| H A D | perl.c | 4014 GV *tmpgv; local
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);
4131 GV* tmpgv; local
[all...] |
| H A D | pp_ctl.c | 1551 GV* tmpgv; local
1552 PL_dbargs = GvAV(gv_AVadd(tmpgv = gv_fetchpv("DB::args", TRUE,
1554 GvMULTI_on(tmpgv);
|
| H A D | pp_sys.c | 2079 GV *tmpgv; local
2083 tmpgv = gv_fetchpv(POPpx, FALSE, SVt_PVIO);
2086 if (!GvIO(tmpgv))
2090 io = GvIOp(tmpgv);
2112 tmpgv = (GV*)sv; /* *main::FRED for example */
2116 tmpgv = (GV*) SvRV(sv); /* \*main::FRED for example */
3976 GV *tmpgv; local
3985 if ((tmpgv = gv_fetchpv("$", TRUE, SVt_PV))) {
3986 SvREADONLY_off(GvSV(tmpgv));
3987 sv_setiv(GvSV(tmpgv), (I
[all...] |
| H A D | util.c | 1979 GV* tmpgv; local
2021 if ((tmpgv = gv_fetchpv("$",TRUE, SVt_PV))) {
2022 SvREADONLY_off(GvSV(tmpgv));
2023 sv_setiv(GvSV(tmpgv), PerlProc_getpid());
2024 SvREADONLY_on(GvSV(tmpgv));
|
Completed in 59 milliseconds