Searched refs:blk_oldcop (Results 1 - 4 of 4) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/
H A Dcop.h320 #define blk_oldcop cx_u.cx_blk.blku_oldcop macro
334 cx->blk_oldcop = PL_curcop, \
346 PL_curcop = cx->blk_oldcop, \
H A Dpp_ctl.c1384 PL_curcop = cx->blk_oldcop;
1477 stashname = CopSTASHPV(cx->blk_oldcop);
1496 PUSHs(sv_2mortal(newSVpv(OutCopFILE(cx->blk_oldcop), 0)));
1497 PUSHs(sv_2mortal(newSViv((I32)CopLINE(cx->blk_oldcop))));
1566 PUSHs(sv_2mortal(newSViv((I32)cx->blk_oldcop->op_private &
1570 SV * old_warnings = cx->blk_oldcop->cop_warnings ;
2373 gotoprobe = cx->blk_oldcop->op_sibling;
2379 gotoprobe = cx->blk_oldcop->op_sibling;
2743 *db_seqp = cx->blk_oldcop->cop_seq;
H A Dscope.c1062 PTR2UV(cx->blk_oldcop));
H A Dsv.c10187 ncx->blk_oldcop = cx->blk_oldcop;

Completed in 83 milliseconds