Lines Matching defs:listop

4189             /* The listop in rops might have a pushmark at the beginning,
5554          * ck_split() create a real PMOP and leave the op's type as listop
5668     LISTOP *listop;
5677     NewOp(1101, listop, 1, LISTOP);
5678     OpTYPE_set(listop, type);
5681     listop->op_flags = (U8)flags;
5689     listop->op_first = first;
5690     listop->op_last = last;
5694         listop->op_first = pushop;
5695         listop->op_flags |= OPf_KIDS;
5697             listop->op_last = pushop;
5699     if (listop->op_last)
5700         OpLASTSIB_set(listop->op_last, (OP*)listop);
5702     return CHECKOP(type, listop);
9192     OP* listop;
9243      * op, in listop. This is wrong. [perl #27024] */
9246     listop = op_append_elem(OP_LINESEQ, block, newOP(OP_UNSTACK, 0));
9247     o = new_logop(OP_AND, 0, &expr, &listop);
9250         ASSUME(listop);
9253     if (listop)
9254         cLISTOPx(listop)->op_last->op_next = LINKLIST(o);
9256     if (once && o != listop)
9263     if (o == listop)
9302     OP *listop;
9356     listop = op_append_list(OP_LINESEQ, block, cont);
9357     assert(listop);
9358     redo = LINKLIST(listop);
9361         scalar(listop);
9362         o = new_logop(OP_AND, 0, &expr, &listop);
9365             return expr;		/* listop already freed by new_logop */
9367         if (listop)
9368             cLISTOPx(listop)->op_last->op_next =
9369                 (o == listop ? redo : LINKLIST(o));
9372         o = listop;
9552         LISTOP* listop;
9558         listop = cLISTOPx(newLISTOP(OP_LIST, 0, left, right));
9559         listop->op_first->op_next = range->op_next;
9561         right->op_next = (OP*)listop;
9562         listop->op_next = listop->op_first;
9565         expr = (OP*)(listop);