@@ -2340,30 +2340,6 @@ inline op nqp_nfa_run_protoregex(out PMC, invar PMC, in STR, in INT) :base_core
2340
2340
$1 = fatepmc;
2341
2341
}
2342
2342
2343
- inline op nqp_nfa_run_alternation(invar PMC, in STR, in INT, invar PMC, invar PMC) :base_core {
2344
- PMC *states = $1;
2345
- STRING *target = $2;
2346
- INTVAL offset = $3;
2347
- PMC *bstack = $4;
2348
- PMC *cstack = $5;
2349
-
2350
- /* Run the NFA. */
2351
- INTVAL total_fates, i;
2352
- INTVAL *fates = nqp_nfa_run(interp, states, target, offset, &total_fates);
2353
-
2354
- /* Push the results onto the bstack. */
2355
- INTVAL caps = VTABLE_defined(interp, cstack) ? VTABLE_elements(interp, cstack) : 0;
2356
- PMC *labels = VTABLE_get_pmc_keyed_int(interp, states, 0);
2357
- for (i = 0; i < total_fates; i++) {
2358
- VTABLE_push_integer(interp, bstack,
2359
- VTABLE_get_integer_keyed_int(interp, labels, fates[i]));
2360
- VTABLE_push_integer(interp, bstack, offset);
2361
- VTABLE_push_integer(interp, bstack, 0);
2362
- VTABLE_push_integer(interp, bstack, caps);
2363
- }
2364
- free(fates);
2365
- }
2366
-
2367
2343
inline op nqp_nfa_run_alternation(invar PMC, in STR, in INT, invar PMC, invar PMC, invar PMC) :base_core {
2368
2344
PMC *states = $1;
2369
2345
STRING *target = $2;
0 commit comments