1997-09-16 23:25:59 +04:00
|
|
|
/*
|
2005-01-05 21:20:51 +03:00
|
|
|
** $Id: ltable.h,v 2.4 2005/01/04 15:55:12 roberto Exp roberto $
|
1997-09-16 23:25:59 +04:00
|
|
|
** Lua tables (hash)
|
|
|
|
** See Copyright Notice in lua.h
|
|
|
|
*/
|
|
|
|
|
|
|
|
#ifndef ltable_h
|
|
|
|
#define ltable_h
|
|
|
|
|
|
|
|
#include "lobject.h"
|
|
|
|
|
|
|
|
|
2003-03-18 15:50:04 +03:00
|
|
|
#define gnode(t,i) (&(t)->node[i])
|
|
|
|
#define gkey(n) (&(n)->i_key)
|
|
|
|
#define gval(n) (&(n)->i_val)
|
2004-10-06 22:34:16 +04:00
|
|
|
#define gnext(n) ((n)->i_key.next)
|
|
|
|
|
|
|
|
#define key2tval(n) (cast(const TValue *, gkey(n)))
|
1997-09-16 23:25:59 +04:00
|
|
|
|
2001-08-31 00:56:43 +04:00
|
|
|
|
2005-01-05 21:20:51 +03:00
|
|
|
extern const Node luaH_dummynode;
|
|
|
|
|
2003-12-10 15:13:36 +03:00
|
|
|
const TValue *luaH_getnum (Table *t, int key);
|
|
|
|
TValue *luaH_setnum (lua_State *L, Table *t, int key);
|
|
|
|
const TValue *luaH_getstr (Table *t, TString *key);
|
|
|
|
TValue *luaH_setstr (lua_State *L, Table *t, TString *key);
|
|
|
|
const TValue *luaH_get (Table *t, const TValue *key);
|
|
|
|
TValue *luaH_set (lua_State *L, Table *t, const TValue *key);
|
2001-10-25 23:14:14 +04:00
|
|
|
Table *luaH_new (lua_State *L, int narray, int lnhash);
|
2005-01-04 18:55:12 +03:00
|
|
|
void luaH_resizearray (lua_State *L, Table *t, int nasize);
|
2001-10-25 23:14:14 +04:00
|
|
|
void luaH_free (lua_State *L, Table *t);
|
2002-11-07 19:03:33 +03:00
|
|
|
int luaH_next (lua_State *L, Table *t, StkId key);
|
1999-10-26 14:53:40 +04:00
|
|
|
|
|
|
|
/* exported only for debugging */
|
2003-12-10 15:13:36 +03:00
|
|
|
Node *luaH_mainposition (const Table *t, const TValue *key);
|
1998-07-12 20:15:19 +04:00
|
|
|
|
1997-09-16 23:25:59 +04:00
|
|
|
|
|
|
|
#endif
|