Lines Matching refs:next
681 regnode *scan = *scanp, *next;
700 next = scan + NODE_SZ_STR(scan);
707 if (OP(n) == TAIL || n > next)
711 next = n + NODE_STEP_REGNODE;
726 next = n + NODE_SZ_STR(n);
730 stop = next - 1;
791 /* Follow the next-chain of the current node and optimize
817 next = regnext(scan);
820 if (OP(next) == code || code == IFTHEN || code == SUSPEND) {
840 next = regnext(scan);
851 /* we suppose the run is continuous, last=next...*/
853 next, &data_fake, f);
860 scan = next;
1035 next = NEXTOPER(scan);
1036 if (OP(next) == EXACT || (flags & SCF_DO_STCLASS)) {
1039 next = regnext(scan);
1052 next = regnext(scan);
1066 next = regnext(scan);
1133 scan = next;
1352 while (PL_regkind[(U8)OP(next = regnext(oscan))] == NOTHING
1353 && NEXT_OFF(next))
1354 NEXT_OFF(oscan) += NEXT_OFF(next);
1599 next = regnext(scan);
1630 next = regnext(scan);
1632 if ( next && (OP(next) != WHILEM) && next < last)
2640 register char *next;
2659 next = RExC_parse + 1;
2661 while (isDIGIT(*next) || *next == ',') {
2662 if (*next == ',') {
2666 maxpos = next;
2668 next++;
2670 if (*next == '}') { /* got one */
2672 maxpos = next;
2684 RExC_parse = next;
4125 continue; /* but do it the next time */
4129 /* now is the next time */
4458 - regtail - set the next-pointer at the end of a node chain of p to val.
4533 register regnode *next;
4542 next = regnext(node);
4549 if (next == NULL) /* Next ptr. */
4552 PerlIO_printf(Perl_debug_log, "(%"IVdf")", (IV)(next - start));
4556 register regnode *nnode = (OP(next) == LONGJMP
4557 ? regnext(next)
4558 : next);
4564 node = dumpuntil(start, NEXTOPER(node), next, sv, l + 1);
4566 else if ( op == CURLY) { /* `next' might be very big: optimizer */
4572 next, sv, l + 1);
5016 - regnext - dig the "next" pointer out of a node