1993-07-28 10:18:00 -03:00
|
|
|
/*
|
|
|
|
** hash.h
|
|
|
|
** hash manager for lua
|
1996-03-08 09:04:04 -03:00
|
|
|
** $Id: hash.h,v 2.10 1996/02/12 18:32:40 roberto Exp roberto $
|
1993-07-28 10:18:00 -03:00
|
|
|
*/
|
|
|
|
|
|
|
|
#ifndef hash_h
|
|
|
|
#define hash_h
|
|
|
|
|
1995-01-12 12:19:04 -02:00
|
|
|
#include "types.h"
|
1996-02-12 15:32:40 -03:00
|
|
|
#include "opcode.h"
|
1995-01-12 12:19:04 -02:00
|
|
|
|
1993-07-28 10:18:00 -03:00
|
|
|
typedef struct node
|
|
|
|
{
|
|
|
|
Object ref;
|
|
|
|
Object val;
|
|
|
|
} Node;
|
|
|
|
|
|
|
|
typedef struct Hash
|
|
|
|
{
|
1994-09-08 13:51:49 -03:00
|
|
|
struct Hash *next;
|
1993-07-28 10:18:00 -03:00
|
|
|
char mark;
|
1994-12-20 19:20:36 -02:00
|
|
|
Word nhash;
|
|
|
|
Word nuse;
|
1994-08-09 08:24:45 -03:00
|
|
|
Node *node;
|
1993-07-28 10:18:00 -03:00
|
|
|
} Hash;
|
|
|
|
|
|
|
|
|
1996-02-07 12:13:17 -02:00
|
|
|
int lua_equalObj (Object *t1, Object *t2);
|
1996-02-12 15:32:40 -03:00
|
|
|
Word luaI_redimension (Word nhash);
|
1994-12-20 19:20:36 -02:00
|
|
|
Hash *lua_createarray (Word nhash);
|
1994-04-20 19:07:57 -03:00
|
|
|
void lua_hashmark (Hash *h);
|
1995-01-12 12:19:04 -02:00
|
|
|
Long lua_hashcollector (void);
|
1994-08-05 16:25:09 -03:00
|
|
|
Object *lua_hashget (Hash *t, Object *ref);
|
1993-07-28 10:18:00 -03:00
|
|
|
Object *lua_hashdefine (Hash *t, Object *ref);
|
|
|
|
void lua_next (void);
|
|
|
|
|
|
|
|
#endif
|