diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1995-01-12 12:19:04 -0200 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1995-01-12 12:19:04 -0200 |
| commit | 8faf4d1de2cbda61ae871fc23091deff3672e0fc (patch) | |
| tree | c31722dca150cfc776ce5cb92dd771399446631f /hash.c | |
| parent | 53c0a0f43c5ced8e5f7435aa50f1bfb1e5371992 (diff) | |
| download | lua-8faf4d1de2cbda61ae871fc23091deff3672e0fc.tar.gz lua-8faf4d1de2cbda61ae871fc23091deff3672e0fc.tar.bz2 lua-8faf4d1de2cbda61ae871fc23091deff3672e0fc.zip | |
control of garbage collection is done with Longs, as there can be
more than WORD objects to collect.
Diffstat (limited to 'hash.c')
| -rw-r--r-- | hash.c | 6 |
1 files changed, 3 insertions, 3 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.21 1994/12/16 15:55:04 roberto Exp roberto $"; | 6 | char *rcs_hash="$Id: hash.c,v 2.22 1994/12/20 21:20:36 roberto Exp roberto $"; |
| 7 | 7 | ||
| 8 | #include "mem.h" | 8 | #include "mem.h" |
| 9 | #include "opcode.h" | 9 | #include "opcode.h" |
| @@ -185,10 +185,10 @@ static void call_fallbacks (void) | |||
| 185 | ** Garbage collection to arrays | 185 | ** Garbage collection to arrays |
| 186 | ** Delete all unmarked arrays. | 186 | ** Delete all unmarked arrays. |
| 187 | */ | 187 | */ |
| 188 | Word lua_hashcollector (void) | 188 | Long lua_hashcollector (void) |
| 189 | { | 189 | { |
| 190 | Hash *curr_array = listhead, *prev = NULL; | 190 | Hash *curr_array = listhead, *prev = NULL; |
| 191 | Word counter = 0; | 191 | Long counter = 0; |
| 192 | call_fallbacks(); | 192 | call_fallbacks(); |
| 193 | while (curr_array != NULL) | 193 | while (curr_array != NULL) |
| 194 | { | 194 | { |