Searched refs:PL_e_script (Results 1 – 4 of 4) sorted by relevance
677 if (PL_e_script) { in perl_destruct()678 SvREFCNT_dec(PL_e_script); in perl_destruct()679 PL_e_script = Nullsv; in perl_destruct()1397 if (!PL_e_script) { in S_parse_body()1398 PL_e_script = newSVpvn("",0); in S_parse_body()1402 sv_catpv(PL_e_script, s); in S_parse_body()1404 sv_catpv(PL_e_script, argv[1]); in S_parse_body()1409 sv_catpv(PL_e_script, "\n"); in S_parse_body()1615 if (PL_e_script) { in S_parse_body()1778 if (PL_e_script) { in S_parse_body()[all …]
221 #undef PL_e_script222 #define PL_e_script (*Perl_Ie_script_ptr(aTHX))
250 #define PL_e_script (PERL_GET_INTERP->Ie_script) macro572 #define PL_e_script (vTHX->Ie_script) macro897 #define PL_Ie_script PL_e_script
10848 PL_e_script = sv_dup_inc(proto_perl->Ie_script, param); in perl_clone_using()