diff options
| -rw-r--r-- | hash.c | 4 | ||||
| -rw-r--r-- | hash.h | 4 | ||||
| -rw-r--r-- | types.h | 4 |
3 files changed, 5 insertions, 7 deletions
| @@ -3,7 +3,7 @@ | |||
| 3 | ** hash manager for lua | 3 | ** hash manager for lua |
| 4 | */ | 4 | */ |
| 5 | 5 | ||
| 6 | char *rcs_hash="$Id: hash.c,v 2.25 1995/05/02 18:43:03 roberto Exp $"; | 6 | char *rcs_hash="$Id: hash.c,v 2.26 1995/10/04 14:20:26 roberto Exp roberto $"; |
| 7 | 7 | ||
| 8 | #include <string.h> | 8 | #include <string.h> |
| 9 | 9 | ||
| @@ -80,7 +80,7 @@ static Word hashindex (Hash *t, Object *ref) /* hash function */ | |||
| 80 | } | 80 | } |
| 81 | } | 81 | } |
| 82 | 82 | ||
| 83 | Bool lua_equalObj (Object *t1, Object *t2) | 83 | int lua_equalObj (Object *t1, Object *t2) |
| 84 | { | 84 | { |
| 85 | if (tag(t1) != tag(t2)) return 0; | 85 | if (tag(t1) != tag(t2)) return 0; |
| 86 | switch (tag(t1)) | 86 | switch (tag(t1)) |
| @@ -2,7 +2,7 @@ | |||
| 2 | ** hash.h | 2 | ** hash.h |
| 3 | ** hash manager for lua | 3 | ** hash manager for lua |
| 4 | ** Luiz Henrique de Figueiredo - 17 Aug 90 | 4 | ** Luiz Henrique de Figueiredo - 17 Aug 90 |
| 5 | ** $Id: hash.h,v 2.7 1994/12/20 21:20:36 roberto Exp roberto $ | 5 | ** $Id: hash.h,v 2.8 1995/01/12 14:19:04 roberto Exp roberto $ |
| 6 | */ | 6 | */ |
| 7 | 7 | ||
| 8 | #ifndef hash_h | 8 | #ifndef hash_h |
| @@ -26,7 +26,7 @@ typedef struct Hash | |||
| 26 | } Hash; | 26 | } Hash; |
| 27 | 27 | ||
| 28 | 28 | ||
| 29 | Bool lua_equalObj (Object *t1, Object *t2); | 29 | int lua_equalObj (Object *t1, Object *t2); |
| 30 | Hash *lua_createarray (Word nhash); | 30 | Hash *lua_createarray (Word nhash); |
| 31 | void lua_hashmark (Hash *h); | 31 | void lua_hashmark (Hash *h); |
| 32 | Long lua_hashcollector (void); | 32 | Long lua_hashcollector (void); |
| @@ -1,6 +1,6 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** TeCGraf - PUC-Rio | 2 | ** TeCGraf - PUC-Rio |
| 3 | ** $Id: types.h,v 1.2 1994/12/27 20:41:47 celes Exp roberto $ | 3 | ** $Id: types.h,v 1.3 1995/02/06 19:32:43 roberto Exp roberto $ |
| 4 | */ | 4 | */ |
| 5 | 5 | ||
| 6 | #ifndef types_h | 6 | #ifndef types_h |
| @@ -12,8 +12,6 @@ | |||
| 12 | #define real float | 12 | #define real float |
| 13 | #endif | 13 | #endif |
| 14 | 14 | ||
| 15 | typedef int Bool; /* boolean values */ | ||
| 16 | |||
| 17 | #define Byte lua_Byte /* some systems have Byte as a predefined type */ | 15 | #define Byte lua_Byte /* some systems have Byte as a predefined type */ |
| 18 | typedef unsigned char Byte; /* unsigned 8 bits */ | 16 | typedef unsigned char Byte; /* unsigned 8 bits */ |
| 19 | 17 | ||
