1997-09-17 03:25:59 +08:00
|
|
|
/*
|
2002-03-11 20:45:00 +08:00
|
|
|
** $Id: ltable.h,v 1.40 2002/02/14 21:41:08 roberto Exp roberto $
|
1997-09-17 03:25:59 +08:00
|
|
|
** Lua tables (hash)
|
|
|
|
** See Copyright Notice in lua.h
|
|
|
|
*/
|
|
|
|
|
|
|
|
#ifndef ltable_h
|
|
|
|
#define ltable_h
|
|
|
|
|
|
|
|
#include "lobject.h"
|
|
|
|
|
|
|
|
|
2001-11-30 04:21:46 +08:00
|
|
|
#define node(t,i) (&(t)->node[i])
|
2002-03-11 20:45:00 +08:00
|
|
|
#define key(n) (&(n)->i_key)
|
|
|
|
#define val(n) (&(n)->i_val)
|
1997-09-17 03:25:59 +08:00
|
|
|
|
2001-09-01 03:46:07 +08:00
|
|
|
#define settableval(p,v) setobj(cast(TObject *, p), v)
|
2001-08-31 04:56:43 +08:00
|
|
|
|
|
|
|
|
2001-10-26 03:14:14 +08:00
|
|
|
const TObject *luaH_getnum (Table *t, int key);
|
|
|
|
void luaH_setnum (lua_State *L, Table *t, int key, const TObject *val);
|
|
|
|
const TObject *luaH_getstr (Table *t, TString *key);
|
|
|
|
const TObject *luaH_get (Table *t, const TObject *key);
|
|
|
|
void luaH_set (lua_State *L, Table *t, const TObject *key, const TObject *val);
|
|
|
|
Table *luaH_new (lua_State *L, int narray, int lnhash);
|
|
|
|
void luaH_free (lua_State *L, Table *t);
|
2002-02-15 05:46:13 +08:00
|
|
|
int luaH_next (lua_State *L, Table *t, TObject *key);
|
1999-10-26 18:53:40 +08:00
|
|
|
|
|
|
|
/* exported only for debugging */
|
2001-10-26 03:14:14 +08:00
|
|
|
Node *luaH_mainposition (const Table *t, const TObject *key);
|
1998-07-13 00:15:19 +08:00
|
|
|
|
1997-09-17 03:25:59 +08:00
|
|
|
|
|
|
|
#endif
|