| 8955 | |
| 8956 | |
| 8957 | static void stack_init (lua_State *L1, lua_State *L) { |
| 8958 | /* initialize CallInfo array */ |
| 8959 | L1->base_ci = luaM_newvector(L, BASIC_CI_SIZE, CallInfo); |
| 8960 | L1->ci = L1->base_ci; |
| 8961 | L1->size_ci = BASIC_CI_SIZE; |
| 8962 | L1->end_ci = L1->base_ci + L1->size_ci - 1; |
| 8963 | /* initialize stack array */ |
| 8964 | L1->stack = luaM_newvector(L, BASIC_STACK_SIZE + EXTRA_STACK, TValue); |
| 8965 | L1->stacksize = BASIC_STACK_SIZE + EXTRA_STACK; |
| 8966 | L1->top = L1->stack; |
| 8967 | L1->stack_last = L1->stack+(L1->stacksize - EXTRA_STACK)-1; |
| 8968 | /* initialize first ci */ |
| 8969 | L1->ci->func = L1->top; |
| 8970 | setnilvalue(L1->top++); /* `function' entry for this `ci' */ |
| 8971 | L1->base = L1->ci->base = L1->top; |
| 8972 | L1->ci->top = L1->top + LUA_MINSTACK; |
| 8973 | } |
| 8974 | |
| 8975 | |
| 8976 | static void freestack (lua_State *L, lua_State *L1) { |
no outgoing calls
no test coverage detected