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