| 977 | } |
| 978 | |
| 979 | LUA_API void lua_setfield(lua_State *L, int idx, const char *k) |
| 980 | { |
| 981 | TValue *o; |
| 982 | TValue key; |
| 983 | cTValue *t = index2adr_check(L, idx); |
| 984 | lj_checkapi_slot(1); |
| 985 | setstrV(L, &key, lj_str_newz(L, k)); |
| 986 | o = lj_meta_tset(L, t, &key); |
| 987 | if (o) { |
| 988 | /* NOBARRIER: lj_meta_tset ensures the table is not black. */ |
| 989 | copyTV(L, o, --L->top); |
| 990 | } else { |
| 991 | TValue *base = L->top; |
| 992 | copyTV(L, base+2, base-3-2*LJ_FR2); |
| 993 | L->top = base+3; |
| 994 | lj_vm_call(L, base, 0+1); |
| 995 | L->top -= 2+LJ_FR2; |
| 996 | } |
| 997 | } |
| 998 | |
| 999 | LUA_API void lua_rawset(lua_State *L, int idx) |
| 1000 | { |
no test coverage detected