Searched refs:PL_e_script (Results 1 – 4 of 4) sorted by relevance
971 if (PL_e_script) { in perl_destruct()972 SvREFCNT_dec(PL_e_script); in perl_destruct()973 PL_e_script = Nullsv; in perl_destruct()1728 if (!PL_e_script) {1729 PL_e_script = newSVpvn("",0);1733 sv_catpv(PL_e_script, s);1735 sv_catpv(PL_e_script, argv[1]);1740 sv_catpv(PL_e_script, "\n");2054 if (PL_e_script) {2220 if (PL_e_script) {[all …]
253 #define PL_e_script (PERL_GET_INTERP->Ie_script) macro578 #define PL_e_script (vTHX->Ie_script) macro906 #define PL_Ie_script PL_e_script
242 #undef PL_e_script243 #define PL_e_script (*Perl_Ie_script_ptr(aTHX))
11101 PL_e_script = sv_dup_inc(proto_perl->Ie_script, param); in perl_clone_using()