Lines Matching defs:PL_curcop
629 PL_curcop|5.004050||p
3855 # define PL_curcop curcop
4115 COP * const ocurcop = PL_curcop;
4127 PL_curcop = ocurcop;
4216 HV *old_cop_stash = PL_curcop->cop_stash;
4218 line_t oldline = PL_curcop->cop_line;
4219 PL_curcop->cop_line = PL_copline;
4223 PL_curstash = PL_curcop->cop_stash = stash;
4241 PL_curcop->cop_stash = old_cop_stash;
4243 PL_curcop->cop_line = oldline;
5702 # define IN_PERL_COMPILETIME (PL_curcop == &PL_compiling)
5706 # define IN_LOCALE_RUNTIME (PL_curcop->op_private & HINT_LOCALE)