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