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 /tree.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 'tree.c')
-rw-r--r-- | tree.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -3,7 +3,7 @@ | |||
3 | ** TecCGraf - PUC-Rio | 3 | ** TecCGraf - PUC-Rio |
4 | */ | 4 | */ |
5 | 5 | ||
6 | char *rcs_tree="$Id: tree.c,v 1.11 1994/11/25 19:27:03 roberto Exp roberto $"; | 6 | char *rcs_tree="$Id: tree.c,v 1.12 1994/12/20 21:20:36 roberto Exp roberto $"; |
7 | 7 | ||
8 | 8 | ||
9 | #include <string.h> | 9 | #include <string.h> |
@@ -78,10 +78,10 @@ TreeNode *lua_constcreate (char *str) | |||
78 | ** Garbage collection function. | 78 | ** Garbage collection function. |
79 | ** This function traverse the string list freeing unindexed strings | 79 | ** This function traverse the string list freeing unindexed strings |
80 | */ | 80 | */ |
81 | Word lua_strcollector (void) | 81 | Long lua_strcollector (void) |
82 | { | 82 | { |
83 | StringNode *curr = string_root, *prev = NULL; | 83 | StringNode *curr = string_root, *prev = NULL; |
84 | Word counter = 0; | 84 | Long counter = 0; |
85 | while (curr) | 85 | while (curr) |
86 | { | 86 | { |
87 | StringNode *next = curr->next; | 87 | StringNode *next = curr->next; |