aboutsummaryrefslogtreecommitdiff
path: root/tree.c
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>1995-01-12 12:19:04 -0200
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>1995-01-12 12:19:04 -0200
commit8faf4d1de2cbda61ae871fc23091deff3672e0fc (patch)
treec31722dca150cfc776ce5cb92dd771399446631f /tree.c
parent53c0a0f43c5ced8e5f7435aa50f1bfb1e5371992 (diff)
downloadlua-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.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/tree.c b/tree.c
index ac0f096d..c34b0560 100644
--- a/tree.c
+++ b/tree.c
@@ -3,7 +3,7 @@
3** TecCGraf - PUC-Rio 3** TecCGraf - PUC-Rio
4*/ 4*/
5 5
6char *rcs_tree="$Id: tree.c,v 1.11 1994/11/25 19:27:03 roberto Exp roberto $"; 6char *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*/
81Word lua_strcollector (void) 81Long 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;