1993-07-28 17:18:00 +04:00
|
|
|
/*
|
|
|
|
** hash.h
|
|
|
|
** hash manager for lua
|
1997-05-14 22:38:29 +04:00
|
|
|
** $Id: hash.h,v 2.15 1997/03/31 14:02:58 roberto Exp roberto $
|
1993-07-28 17:18:00 +04:00
|
|
|
*/
|
|
|
|
|
|
|
|
#ifndef hash_h
|
|
|
|
#define hash_h
|
|
|
|
|
1995-01-12 17:19:04 +03:00
|
|
|
#include "types.h"
|
1996-02-12 21:32:40 +03:00
|
|
|
#include "opcode.h"
|
1995-01-12 17:19:04 +03:00
|
|
|
|
1997-02-26 20:38:41 +03:00
|
|
|
typedef struct node {
|
1997-03-31 18:02:58 +04:00
|
|
|
TObject ref;
|
|
|
|
TObject val;
|
1993-07-28 17:18:00 +04:00
|
|
|
} Node;
|
|
|
|
|
1997-02-26 20:38:41 +03:00
|
|
|
typedef struct Hash {
|
|
|
|
struct Hash *next;
|
|
|
|
Node *node;
|
|
|
|
int nhash;
|
|
|
|
int nuse;
|
|
|
|
int htag;
|
|
|
|
char mark;
|
1993-07-28 17:18:00 +04:00
|
|
|
} Hash;
|
|
|
|
|
|
|
|
|
1997-03-31 18:02:58 +04:00
|
|
|
int lua_equalObj (TObject *t1, TObject *t2);
|
1996-05-06 18:30:27 +04:00
|
|
|
int luaI_redimension (int nhash);
|
|
|
|
Hash *lua_createarray (int nhash);
|
1994-04-21 02:07:57 +04:00
|
|
|
void lua_hashmark (Hash *h);
|
1997-05-14 22:38:29 +04:00
|
|
|
Hash *luaI_hashcollector (long *count);
|
|
|
|
void luaI_hashcallIM (Hash *l);
|
|
|
|
void luaI_hashfree (Hash *frees);
|
1997-03-31 18:02:58 +04:00
|
|
|
TObject *lua_hashget (Hash *t, TObject *ref);
|
|
|
|
TObject *lua_hashdefine (Hash *t, TObject *ref);
|
1993-07-28 17:18:00 +04:00
|
|
|
void lua_next (void);
|
|
|
|
|
|
|
|
#endif
|