| 126 | |
| 127 | |
| 128 | LUA_API void lua_xmove (lua_State *from, lua_State *to, int n) { |
| 129 | int i; |
| 130 | if (from == to) return; |
| 131 | lua_lock(to); |
| 132 | api_checknelems(from, n); |
| 133 | api_check(from, G(from) == G(to), "moving among independent states"); |
| 134 | api_check(from, to->ci->top.p - to->top.p >= n, "stack overflow"); |
| 135 | from->top.p -= n; |
| 136 | for (i = 0; i < n; i++) { |
| 137 | setobjs2s(to, to->top.p, from->top.p + i); |
| 138 | to->top.p++; /* stack already checked by previous 'api_check' */ |
| 139 | } |
| 140 | lua_unlock(to); |
| 141 | } |
| 142 | |
| 143 | |
| 144 | LUA_API lua_CFunction lua_atpanic (lua_State *L, lua_CFunction panicf) { |
no test coverage detected