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 25LUAI_FUNC const TValue *luaH_getint (Table *t, int key); 26LUAI_FUNC void luaH_setint (lua_State *L, Table *t, int key, TValue *value); 27LUAI_FUNC const TValue *luaH_getstr (Table *t, TString *key); 28LUAI_FUNC const TValue *luaH_get (Table *t, const TValue *key); 29LUAI_FUNC TValue *luaH_newkey (lua_State *L, Table *t, const TValue *key); 30LUAI_FUNC TValue *luaH_set (lua_State *L, Table *t, const TValue *key); 31LUAI_FUNC Table *luaH_new (lua_State *L); 32LUAI_FUNC void luaH_resize (lua_State *L, Table *t, int nasize, int nhsize); 33LUAI_FUNC void luaH_resizearray (lua_State *L, Table *t, int nasize); 34LUAI_FUNC void luaH_free (lua_State *L, Table *t); 35LUAI_FUNC int luaH_next (lua_State *L, Table *t, StkId key); 36LUAI_FUNC int luaH_getn (Table *t); 37 38 39#if defined(LUA_DEBUG) 40LUAI_FUNC Node *luaH_mainposition (const Table *t, const TValue *key); 41LUAI_FUNC int luaH_isdummy (Node *n); 42#endif 43 44 45#endif 46