Lines Matching defs:repl
2333 Perl_pmtrans(pTHX_ OP *o, OP *expr, OP *repl)
2336 SV *rstr = ((SVOP*)repl)->op_sv;
2563 op_free(repl);
2634 op_free(repl);
2684 Perl_pmruntime(pTHX_ OP *o, OP *expr, OP *repl)
2691 return pmtrans(o, expr, repl);
2742 if (repl) {
2750 else if (repl->op_type == OP_THREADSV
2752 PL_threadsv_names[repl->op_targ]))
2757 else if (repl->op_type == OP_CONST)
2758 curop = repl;
2761 for (curop = LINKLIST(repl); curop!=repl; curop = LINKLIST(curop)) {
2800 if (curop == repl
2806 prepend_elem(o->op_type, scalar(repl), o);
2809 if (curop == repl && !PM_GETRE(pm)) { /* Has variables. */
2816 rcop->op_first = scalar(repl);
2822 rcop->op_next = LINKLIST(repl);
2823 repl->op_next = (OP*)rcop;