| 427 | |
| 428 | |
| 429 | static int lua_checkpc (CallInfo *ci) { |
| 430 | if (!isLua(ci)) return 1; |
| 431 | else { |
| 432 | StkId f = ci->func.p; |
| 433 | Proto *p = clLvalue(s2v(f))->p; |
| 434 | return p->code <= ci->u.l.savedpc && |
| 435 | ci->u.l.savedpc <= p->code + p->sizecode; |
| 436 | } |
| 437 | } |
| 438 | |
| 439 | |
| 440 | static void checkstack (global_State *g, lua_State *L1) { |