Searched refs:tmpop (Results 1 – 2 of 2) sorted by relevance
8539 OP *tmpop; in Perl_newASSIGNOP() local8561 tmpop = cUNOPo->op_first; /* to list (nulled) */ in Perl_newASSIGNOP()8562 tmpop = cUNOPx(tmpop)->op_first; /* to pushmark */ in Perl_newASSIGNOP()8563 assert(OpSIBLING(tmpop) == right); in Perl_newASSIGNOP()8567 op_sibling_splice(cUNOPo->op_first, tmpop, 1, NULL); in Perl_newASSIGNOP()
897 (tmpop = op_sibling_splice(parent, NULL, 1, NULL)) \898 ? tmpop : (croak("RPN stack underflow"), (OP*)NULL))903 OP *tmpop; in THX_parse_rpn_expr() local