| 631 | |
| 632 | |
| 633 | static int auxgetstr (lua_State *L, const TValue *t, const char *k) { |
| 634 | const TValue *slot; |
| 635 | TString *str = luaS_new(L, k); |
| 636 | if (luaV_fastget(L, t, str, slot, luaH_getstr)) { |
| 637 | setobj2s(L, L->top, slot); |
| 638 | api_incr_top(L); |
| 639 | } |
| 640 | else { |
| 641 | setsvalue2s(L, L->top, str); |
| 642 | api_incr_top(L); |
| 643 | luaV_finishget(L, t, s2v(L->top - 1), L->top - 1, slot); |
| 644 | } |
| 645 | lua_unlock(L); |
| 646 | return ttype(s2v(L->top - 1)); |
| 647 | } |
| 648 | |
| 649 | |
| 650 | /* |
no test coverage detected