Lines Matching refs:scan
2252 register regnode *scan; /* Current node. */ in S_regmatch() local
2280 scan = prog; in S_regmatch()
2281 while (scan != NULL) { in S_regmatch()
2310 regprop(prop, scan); in S_regmatch()
2313 do_utf8 && OP(scan) != CANY ? in S_regmatch()
2318 char *s1 = do_utf8 && OP(scan) != CANY ? in S_regmatch()
2323 char *s2 = do_utf8 && OP(scan) != CANY ? in S_regmatch()
2343 (IV)(scan - PL_regprogram), PL_regindent*2, "", in S_regmatch()
2348 next = scan + NEXT_OFF(scan); in S_regmatch()
2349 if (next == scan) in S_regmatch()
2352 switch (OP(scan)) { in S_regmatch()
2427 s = STRING(scan); in S_regmatch()
2428 ln = STR_LEN(scan); in S_regmatch()
2482 s = STRING(scan); in S_regmatch()
2483 ln = STR_LEN(scan); in S_regmatch()
2514 UCHARAT(s) != ((OP(scan) == EXACTF) in S_regmatch()
2519 if (ln > 1 && (OP(scan) == EXACTF in S_regmatch()
2530 if (!reginclass(scan, (U8*)locinput, &inclasslen, do_utf8)) in S_regmatch()
2541 if (!REGINCLASS(scan, (U8*)locinput)) in S_regmatch()
2552 if (ANYOF_FOLD_SHARP_S(scan, locinput, PL_regeol)) { in S_regmatch()
2567 if (!(OP(scan) == ALNUM in S_regmatch()
2577 if (!(OP(scan) == ALNUM in S_regmatch()
2590 if (OP(scan) == NALNUM in S_regmatch()
2600 if (OP(scan) == NALNUM in S_regmatch()
2620 if (OP(scan) == BOUND || OP(scan) == NBOUND) { in S_regmatch()
2633 if (OP(scan) == BOUND || OP(scan) == NBOUND) { in S_regmatch()
2642 if (((!ln) == (!n)) == (OP(scan) == BOUND || in S_regmatch()
2643 OP(scan) == BOUNDL)) in S_regmatch()
2655 if (!(OP(scan) == SPACE in S_regmatch()
2665 if (!(OP(scan) == SPACE in S_regmatch()
2671 if (!(OP(scan) == SPACE in S_regmatch()
2685 if (OP(scan) == NSPACE in S_regmatch()
2695 if (OP(scan) == NSPACE in S_regmatch()
2708 if (!(OP(scan) == DIGIT in S_regmatch()
2718 if (!(OP(scan) == DIGIT in S_regmatch()
2731 if (OP(scan) == NDIGIT in S_regmatch()
2741 if (OP(scan) == NDIGIT in S_regmatch()
2769 n = ARG(scan); /* which paren pair */ in S_regmatch()
2778 if (do_utf8 && OP(scan) != REF) { /* REF can do byte comparison */ in S_regmatch()
2786 if (OP(scan) == REFF) { in S_regmatch()
2808 (OP(scan) == REF || in S_regmatch()
2809 (UCHARAT(s) != ((OP(scan) == REFF in S_regmatch()
2815 if (ln > 1 && (OP(scan) == REF in S_regmatch()
2817 : (OP(scan) == REFF in S_regmatch()
2839 n = ARG(scan); in S_regmatch()
2977 n = ARG(scan); /* which paren pair */ in S_regmatch()
2983 n = ARG(scan); /* which paren pair */ in S_regmatch()
2991 n = ARG(scan); /* which paren pair */ in S_regmatch()
2997 next = NEXTOPER(NEXTOPER(scan)); in S_regmatch()
2999 next = scan + ARG(scan); in S_regmatch()
3005 logical = scan->flags; in S_regmatch()
3086 I32 parenfloor = scan->flags; in S_regmatch()
3098 cc.min = ARG1(scan); in S_regmatch()
3099 cc.max = ARG2(scan); in S_regmatch()
3100 cc.scan = NEXTOPER(scan) + EXTRA_STEP_2ARGS; in S_regmatch()
3160 if (regmatch(cc->scan)) in S_regmatch()
3167 if (scan->flags) { in S_regmatch()
3172 PL_reg_maxiter = (PL_regeol - PL_bostr + 1) * (scan->flags>>4); in S_regmatch()
3197 o = (scan->flags & 0xf) - 1 + o * (scan->flags>>4); in S_regmatch()
3255 if (regmatch(cc->scan)) { in S_regmatch()
3273 if (regmatch(cc->scan)) { in S_regmatch()
3309 next = scan + ARG(scan); in S_regmatch()
3310 if (next == scan) in S_regmatch()
3312 inner = NEXTOPER(NEXTOPER(scan)); in S_regmatch()
3315 inner = NEXTOPER(scan); in S_regmatch()
3318 c1 = OP(scan); in S_regmatch()
3360 ln = ARG1(scan); /* min to match */ in S_regmatch()
3361 n = ARG2(scan); /* max to match */ in S_regmatch()
3362 paren = scan->flags; in S_regmatch()
3369 scan = NEXTOPER(scan) + NODE_STEP_REGNODE; in S_regmatch()
3371 scan += NEXT_OFF(scan); /* Skip former OPEN. */ in S_regmatch()
3375 if (ln && regrepeat_hard(scan, ln, &l) < ln) in S_regmatch()
3433 if (regrepeat_hard(scan, 1, &l)) { in S_regmatch()
3442 n = regrepeat_hard(scan, n, &l); in S_regmatch()
3517 paren = scan->flags; /* Which paren to set */ in S_regmatch()
3522 ln = ARG1(scan); /* min to match */ in S_regmatch()
3523 n = ARG2(scan); /* max to match */ in S_regmatch()
3524 scan = regnext(NEXTOPER(scan) + NODE_STEP_REGNODE); in S_regmatch()
3528 ln = ARG1(scan); /* min to match */ in S_regmatch()
3529 n = ARG2(scan); /* max to match */ in S_regmatch()
3530 scan = NEXTOPER(scan) + NODE_STEP_REGNODE; in S_regmatch()
3535 scan = NEXTOPER(scan); in S_regmatch()
3541 scan = NEXTOPER(scan); in S_regmatch()
3607 if (ln && regrepeat(scan, ln) < ln) in S_regmatch()
3681 if (regrepeat(scan, count) < count) in S_regmatch()
3723 if (regrepeat(scan, 1)) { in S_regmatch()
3733 n = regrepeat(scan, n); in S_regmatch()
3851 if (scan->flags) { in S_regmatch()
3852 s = HOPBACKc(locinput, scan->flags); in S_regmatch()
3863 if (scan->flags) { in S_regmatch()
3864 s = HOPBACKc(locinput, scan->flags); in S_regmatch()
3873 inner = NEXTOPER(NEXTOPER(scan)); in S_regmatch()
3893 if (OP(scan) == SUSPEND) { in S_regmatch()
3900 next = scan + ARG(scan); in S_regmatch()
3901 if (next == scan) in S_regmatch()
3906 PTR2UV(scan), OP(scan)); in S_regmatch()
3910 scan = next; in S_regmatch()
3965 scan = next = uwb->next; in S_regmatch()
3966 if ( !scan || in S_regmatch()
3967 OP(scan) != (uwb->type == RE_UNWIND_BRANCH in S_regmatch()
3983 next = NEXTOPER(scan); in S_regmatch()
4017 register char *scan; in S_regrepeat() local
4023 scan = PL_reginput; in S_regrepeat()
4026 else if (max < loceol - scan) in S_regrepeat()
4027 loceol = scan + max; in S_regrepeat()
4032 while (scan < loceol && hardcount < max && *scan != '\n') { in S_regrepeat()
4033 scan += UTF8SKIP(scan); in S_regrepeat()
4037 while (scan < loceol && *scan != '\n') in S_regrepeat()
4038 scan++; in S_regrepeat()
4044 while (scan < loceol && hardcount < max) { in S_regrepeat()
4045 scan += UTF8SKIP(scan); in S_regrepeat()
4050 scan = loceol; in S_regrepeat()
4053 scan = loceol; in S_regrepeat()
4057 while (scan < loceol && UCHARAT(scan) == c) in S_regrepeat()
4058 scan++; in S_regrepeat()
4062 while (scan < loceol && in S_regrepeat()
4063 (UCHARAT(scan) == c || UCHARAT(scan) == PL_fold[c])) in S_regrepeat()
4064 scan++; in S_regrepeat()
4069 while (scan < loceol && in S_regrepeat()
4070 (UCHARAT(scan) == c || UCHARAT(scan) == PL_fold_locale[c])) in S_regrepeat()
4071 scan++; in S_regrepeat()
4076 while (hardcount < max && scan < loceol && in S_regrepeat()
4077 reginclass(p, (U8*)scan, 0, do_utf8)) { in S_regrepeat()
4078 scan += UTF8SKIP(scan); in S_regrepeat()
4082 while (scan < loceol && REGINCLASS(p, (U8*)scan)) in S_regrepeat()
4083 scan++; in S_regrepeat()
4090 while (hardcount < max && scan < loceol && in S_regrepeat()
4091 swash_fetch(PL_utf8_alnum, (U8*)scan, do_utf8)) { in S_regrepeat()
4092 scan += UTF8SKIP(scan); in S_regrepeat()
4096 while (scan < loceol && isALNUM(*scan)) in S_regrepeat()
4097 scan++; in S_regrepeat()
4104 while (hardcount < max && scan < loceol && in S_regrepeat()
4105 isALNUM_LC_utf8((U8*)scan)) { in S_regrepeat()
4106 scan += UTF8SKIP(scan); in S_regrepeat()
4110 while (scan < loceol && isALNUM_LC(*scan)) in S_regrepeat()
4111 scan++; in S_regrepeat()
4118 while (hardcount < max && scan < loceol && in S_regrepeat()
4119 !swash_fetch(PL_utf8_alnum, (U8*)scan, do_utf8)) { in S_regrepeat()
4120 scan += UTF8SKIP(scan); in S_regrepeat()
4124 while (scan < loceol && !isALNUM(*scan)) in S_regrepeat()
4125 scan++; in S_regrepeat()
4132 while (hardcount < max && scan < loceol && in S_regrepeat()
4133 !isALNUM_LC_utf8((U8*)scan)) { in S_regrepeat()
4134 scan += UTF8SKIP(scan); in S_regrepeat()
4138 while (scan < loceol && !isALNUM_LC(*scan)) in S_regrepeat()
4139 scan++; in S_regrepeat()
4146 while (hardcount < max && scan < loceol && in S_regrepeat()
4147 (*scan == ' ' || in S_regrepeat()
4148 swash_fetch(PL_utf8_space,(U8*)scan, do_utf8))) { in S_regrepeat()
4149 scan += UTF8SKIP(scan); in S_regrepeat()
4153 while (scan < loceol && isSPACE(*scan)) in S_regrepeat()
4154 scan++; in S_regrepeat()
4161 while (hardcount < max && scan < loceol && in S_regrepeat()
4162 (*scan == ' ' || isSPACE_LC_utf8((U8*)scan))) { in S_regrepeat()
4163 scan += UTF8SKIP(scan); in S_regrepeat()
4167 while (scan < loceol && isSPACE_LC(*scan)) in S_regrepeat()
4168 scan++; in S_regrepeat()
4175 while (hardcount < max && scan < loceol && in S_regrepeat()
4176 !(*scan == ' ' || in S_regrepeat()
4177 swash_fetch(PL_utf8_space,(U8*)scan, do_utf8))) { in S_regrepeat()
4178 scan += UTF8SKIP(scan); in S_regrepeat()
4182 while (scan < loceol && !isSPACE(*scan)) in S_regrepeat()
4183 scan++; in S_regrepeat()
4190 while (hardcount < max && scan < loceol && in S_regrepeat()
4191 !(*scan == ' ' || isSPACE_LC_utf8((U8*)scan))) { in S_regrepeat()
4192 scan += UTF8SKIP(scan); in S_regrepeat()
4196 while (scan < loceol && !isSPACE_LC(*scan)) in S_regrepeat()
4197 scan++; in S_regrepeat()
4204 while (hardcount < max && scan < loceol && in S_regrepeat()
4205 swash_fetch(PL_utf8_digit, (U8*)scan, do_utf8)) { in S_regrepeat()
4206 scan += UTF8SKIP(scan); in S_regrepeat()
4210 while (scan < loceol && isDIGIT(*scan)) in S_regrepeat()
4211 scan++; in S_regrepeat()
4218 while (hardcount < max && scan < loceol && in S_regrepeat()
4219 !swash_fetch(PL_utf8_digit, (U8*)scan, do_utf8)) { in S_regrepeat()
4220 scan += UTF8SKIP(scan); in S_regrepeat()
4224 while (scan < loceol && !isDIGIT(*scan)) in S_regrepeat()
4225 scan++; in S_regrepeat()
4235 c = scan - PL_reginput; in S_regrepeat()
4236 PL_reginput = scan; in S_regrepeat()
4260 register char *scan = Nullch; in S_regrepeat_hard() local
4271 while (PL_reginput < loceol && (scan = PL_reginput, res = regmatch(p))) { in S_regrepeat_hard()
4287 while (PL_reginput < loceol && (scan = PL_reginput, res = regmatch(p))) { in S_regrepeat_hard()
4290 if (max != REG_INFTY && l*max < loceol - scan) in S_regrepeat_hard()
4291 loceol = scan + l*max; in S_regrepeat_hard()
4298 PL_reginput = scan; in S_regrepeat_hard()