** Executes "full continuation" (everything in the stack) of a ** previously interrupted coroutine until the stack is empty (or another ** interruption long-jumps out of the loop). */
| 675 | ** interruption long-jumps out of the loop). |
| 676 | */ |
| 677 | static void unroll (lua_State *L, void *ud) { |
| 678 | CallInfo *ci; |
| 679 | UNUSED(ud); |
| 680 | while ((ci = L->ci) != &L->base_ci) { /* something in the stack */ |
| 681 | if (!isLua(ci)) /* C function? */ |
| 682 | finishCcall(L, ci); /* complete its execution */ |
| 683 | else { /* Lua function */ |
| 684 | luaV_finishOp(L); /* finish interrupted instruction */ |
| 685 | luaV_execute(L, ci); /* execute down to higher C 'boundary' */ |
| 686 | } |
| 687 | } |
| 688 | } |
| 689 | |
| 690 | |
| 691 | /* |
no test coverage detected