| 587 | |
| 588 | |
| 589 | TValue *luaH_set_int (lua_State *L, Table *t, |
| 590 | const TValue *key, TValue **foundkey) { |
| 591 | const TValue *p = luaH_get_int(t, key, foundkey); |
| 592 | t->flags = 0; |
| 593 | if (p != luaO_nilobject) |
| 594 | return cast(TValue *, p); |
| 595 | else { |
| 596 | if (ttisnil(key)) luaG_runerror(L, "table index is nil"); |
| 597 | else if (ttisnumber(key) && luai_numisnan(nvalue(key))) |
| 598 | luaG_runerror(L, "table index is NaN"); |
| 599 | return newkey(L, t, key); |
| 600 | } |
| 601 | } |
| 602 | |
| 603 | |
| 604 | TValue *luaH_set (lua_State *L, Table *t, const TValue *key) { |
no test coverage detected