Searched refs:PL_compiling (Results 1 - 12 of 12) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/ByteLoader/
H A Dbytecode.h305 SAVECOPFILE(&PL_compiling); \
306 SAVECOPLINE(&PL_compiling); \
312 PL_curcop = &PL_compiling; \
313 PL_compiling.op_private = (U8)(PL_hints & HINT_PRIVATE_MASK);\
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/
H A Dpp_ctl.c2652 SAVECOPSTASH_FREE(&PL_compiling);
2653 CopSTASH_set(&PL_compiling, PL_curstash);
2664 SAVECOPFILE_FREE(&PL_compiling);
2665 CopFILE_set(&PL_compiling, tmpbuf+2);
2666 SAVECOPLINE(&PL_compiling);
2667 CopLINE_set(&PL_compiling, 1);
2707 PL_compiling.op_private = (U8)(PL_hints & HINT_PRIVATE_MASK);
2813 PL_curcop = &PL_compiling;
2865 CopLINE_set(&PL_compiling, 0);
2894 XPUSHs((SV*)CopFILEGV(&PL_compiling));
[all...]
H A Dmg.c659 if (!PL_compiling.cop_io)
662 sv_setsv(sv, PL_compiling.cop_io);
700 if (PL_compiling.cop_warnings == pWARN_NONE ||
701 PL_compiling.cop_warnings == pWARN_STD)
705 else if (PL_compiling.cop_warnings == pWARN_ALL) {
709 sv_setsv(sv, PL_compiling.cop_warnings);
2125 if (!PL_compiling.cop_io)
2126 PL_compiling.cop_io = newSVsv(sv);
2128 sv_setsv(PL_compiling.cop_io,sv);
2156 PL_compiling
[all...]
H A Dperl.c260 PL_curcop = &PL_compiling; /* needed by ckWARN, right away */
536 PL_curcop = &PL_compiling;
830 if (!specialWARN(PL_compiling.cop_warnings))
831 SvREFCNT_dec(PL_compiling.cop_warnings);
832 PL_compiling.cop_warnings = Nullsv;
833 if (!specialCopIO(PL_compiling.cop_io))
834 SvREFCNT_dec(PL_compiling.cop_io);
835 PL_compiling.cop_io = Nullsv;
836 CopFILE_free(&PL_compiling);
837 CopSTASH_free(&PL_compiling);
[all...]
H A Dthrdvar.h129 PERLVARI(Tcurcop, COP * VOL, &PL_compiling)
H A Dop.c602 WITH_THR(PL_curcop = &PL_compiling);
613 WITH_THR(PL_curcop = &PL_compiling);
906 WITH_THR(PL_curcop = &PL_compiling);
916 WITH_THR(PL_curcop = &PL_compiling);
942 PL_curcop = &PL_compiling;
986 PL_compiling.cop_arybase = (I32)SvIV(cSVOPx(PL_eval_start)->op_sv);
990 SAVEI32(PL_compiling.cop_arybase);
991 PL_compiling.cop_arybase = 0;
1829 SAVESPTR(PL_compiling.cop_warnings);
1830 if (! specialWARN(PL_compiling
[all...]
H A Dcop.h591 #define IN_PERL_COMPILETIME (PL_curcop == &PL_compiling)
592 #define IN_PERL_RUNTIME (PL_curcop != &PL_compiling)
H A Dembedvar.h225 #define PL_compiling (PERL_GET_INTERP->Icompiling) macro
547 #define PL_compiling (vTHX->Icompiling) macro
872 #define PL_Icompiling PL_compiling
1472 #define compiling PL_compiling
H A Dperlapi.h171 #undef PL_compiling
172 #define PL_compiling (*Perl_Icompiling_ptr(aTHX))
H A Dsv.c10797 PL_compiling = proto_perl->Icompiling;
10800 PL_compiling.cop_stashpv = savesharedpv(PL_compiling.cop_stashpv);
10801 ptr_table_store(PL_ptr_table, proto_perl->Icompiling.cop_stashpv, PL_compiling.cop_stashpv);
10803 PL_compiling.cop_file = savesharedpv(PL_compiling.cop_file);
10804 ptr_table_store(PL_ptr_table, proto_perl->Icompiling.cop_file, PL_compiling.cop_file);
10806 ptr_table_store(PL_ptr_table, &proto_perl->Icompiling, &PL_compiling);
10807 if (!specialWARN(PL_compiling.cop_warnings))
10808 PL_compiling
[all...]
H A Dutil.c3055 PL_curcop = &PL_compiling;
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Devel/PPPort/
H A DPPPort.pm109 PL_compiling
403 # define PL_compiling compiling
876 (PL_curcop == &PL_compiling ? IN_LOCALE_COMPILETIME : IN_LOCALE_RUNTIME)

Completed in 84 milliseconds