| 136 | |
| 137 | |
| 138 | LUA_API const char *lua_setlocal (lua_State *L, const lua_Debug *ar, int n) { |
| 139 | CallInfo *ci = L->base_ci + ar->i_ci; |
| 140 | const char *name = findlocal(L, ci, n); |
| 141 | lua_lock(L); |
| 142 | if (name) |
| 143 | setobjs2s(L, ci->base + (n - 1), L->top - 1); |
| 144 | L->top--; /* pop value */ |
| 145 | lua_unlock(L); |
| 146 | return name; |
| 147 | } |
| 148 | |
| 149 | |
| 150 | static void funcinfo (lua_Debug *ar, Closure *cl) { |
no test coverage detected