[e16e8f2] | 1 | /* |
---|
| 2 | ** $Id: ltable.h,v 2.16.1.2 2013/08/30 15:49:41 roberto Exp $ |
---|
| 3 | ** Lua tables (hash) |
---|
| 4 | ** See Copyright Notice in lua.h |
---|
| 5 | */ |
---|
| 6 | |
---|
| 7 | #ifndef ltable_h |
---|
| 8 | #define ltable_h |
---|
| 9 | |
---|
| 10 | #include "lobject.h" |
---|
| 11 | |
---|
| 12 | |
---|
| 13 | #define gnode(t,i) (&(t)->node[i]) |
---|
| 14 | #define gkey(n) (&(n)->i_key.tvk) |
---|
| 15 | #define gval(n) (&(n)->i_val) |
---|
| 16 | #define gnext(n) ((n)->i_key.nk.next) |
---|
| 17 | |
---|
| 18 | #define invalidateTMcache(t) ((t)->flags = 0) |
---|
| 19 | |
---|
| 20 | /* returns the key, given the value of a table entry */ |
---|
| 21 | #define keyfromval(v) \ |
---|
| 22 | (gkey(cast(Node *, cast(char *, (v)) - offsetof(Node, i_val)))) |
---|
| 23 | |
---|
| 24 | |
---|
| 25 | LUAI_FUNC const TValue *luaH_getint (Table *t, int key); |
---|
| 26 | LUAI_FUNC void luaH_setint (lua_State *L, Table *t, int key, TValue *value); |
---|
| 27 | LUAI_FUNC const TValue *luaH_getstr (Table *t, TString *key); |
---|
| 28 | LUAI_FUNC const TValue *luaH_get (Table *t, const TValue *key); |
---|
| 29 | LUAI_FUNC TValue *luaH_newkey (lua_State *L, Table *t, const TValue *key); |
---|
| 30 | LUAI_FUNC TValue *luaH_set (lua_State *L, Table *t, const TValue *key); |
---|
| 31 | LUAI_FUNC Table *luaH_new (lua_State *L); |
---|
| 32 | LUAI_FUNC void luaH_resize (lua_State *L, Table *t, int nasize, int nhsize); |
---|
| 33 | LUAI_FUNC void luaH_resizearray (lua_State *L, Table *t, int nasize); |
---|
| 34 | LUAI_FUNC void luaH_free (lua_State *L, Table *t); |
---|
| 35 | LUAI_FUNC int luaH_next (lua_State *L, Table *t, StkId key); |
---|
| 36 | LUAI_FUNC int luaH_getn (Table *t); |
---|
| 37 | |
---|
| 38 | |
---|
| 39 | #if defined(LUA_DEBUG) |
---|
| 40 | LUAI_FUNC Node *luaH_mainposition (const Table *t, const TValue *key); |
---|
| 41 | LUAI_FUNC int luaH_isdummy (Node *n); |
---|
| 42 | #endif |
---|
| 43 | |
---|
| 44 | |
---|
| 45 | #endif |
---|