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 D | bytecode.h | 305 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 D | pp_ctl.c | 2652 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 D | mg.c | 659 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 D | perl.c | 260 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 D | thrdvar.h | 129 PERLVARI(Tcurcop, COP * VOL, &PL_compiling)
|
H A D | op.c | 602 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 D | cop.h | 591 #define IN_PERL_COMPILETIME (PL_curcop == &PL_compiling) 592 #define IN_PERL_RUNTIME (PL_curcop != &PL_compiling)
|
H A D | embedvar.h | 225 #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 D | perlapi.h | 171 #undef PL_compiling 172 #define PL_compiling (*Perl_Icompiling_ptr(aTHX))
|
H A D | sv.c | 10797 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 D | util.c | 3055 PL_curcop = &PL_compiling;
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Devel/PPPort/ |
H A D | PPPort.pm | 109 PL_compiling 403 # define PL_compiling compiling 876 (PL_curcop == &PL_compiling ? IN_LOCALE_COMPILETIME : IN_LOCALE_RUNTIME)
|
Completed in 84 milliseconds