Searched refs:PL_e_script (Results 1 - 4 of 4) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/
H A Dperl.c677 if (PL_e_script) {
678 SvREFCNT_dec(PL_e_script);
679 PL_e_script = Nullsv;
1397 if (!PL_e_script) {
1398 PL_e_script = newSVpvn("",0);
1402 sv_catpv(PL_e_script, s);
1404 sv_catpv(PL_e_script, argv[1]);
1409 sv_catpv(PL_e_script, "\n");
1615 if (PL_e_script) {
1778 if (PL_e_script) {
[all...]
H A Dperlapi.h221 #undef PL_e_script
222 #define PL_e_script (*Perl_Ie_script_ptr(aTHX))
H A Dembedvar.h250 #define PL_e_script (PERL_GET_INTERP->Ie_script) macro
572 #define PL_e_script (vTHX->Ie_script) macro
897 #define PL_Ie_script PL_e_script
H A Dsv.c10848 PL_e_script = sv_dup_inc(proto_perl->Ie_script, param);

Completed in 124 milliseconds