optimization for array part of a Table

This commit is contained in:
Roberto Ierusalimschy
2001-10-25 17:14:14 -02:00
parent fffb6f3814
commit 21aa7e55f2
13 changed files with 432 additions and 226 deletions

View File

@@ -1,5 +1,5 @@
/*
** $Id: ltable.h,v 1.34 2001/07/05 20:31:14 roberto Exp roberto $
** $Id: ltable.h,v 1.36 2001/08/31 19:46:07 roberto Exp $
** Lua tables (hash)
** See Copyright Notice in lua.h
*/
@@ -17,19 +17,19 @@
#define settableval(p,v) setobj(cast(TObject *, p), v)
const TObject *luaH_getnum (Hash *t, int key);
void luaH_setnum (lua_State *L, Hash *t, int key, const TObject *val);
const TObject *luaH_getstr (Hash *t, TString *key);
void luaH_setstr (lua_State *L, Hash *t, TString *key, const TObject *val);
const TObject *luaH_get (Hash *t, const TObject *key);
void luaH_set (lua_State *L, Hash *t, const TObject *key, const TObject *val);
Hash *luaH_new (lua_State *L, int nhash);
void luaH_free (lua_State *L, Hash *t);
Node *luaH_next (lua_State *L, Hash *t, const TObject *r);
int luaH_nexti (Hash *t, int i);
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);
void luaH_setstr (lua_State *L, Table *t, TString *key, const TObject *val);
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);
int luaH_index (lua_State *L, Table *t, const TObject *key);
int luaH_nexti (Table *t, int i, TObject *where);
/* exported only for debugging */
Node *luaH_mainposition (const Hash *t, const TObject *key);
Node *luaH_mainposition (const Table *t, const TObject *key);
#endif