aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>1996-03-14 12:56:26 -0300
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>1996-03-14 12:56:26 -0300
commit3e9daa741623aaa8a191aa98cd43e462b8bf2d33 (patch)
tree72c3635db2ad82d184ea3e8f277e537cb330ad1d
parent7236df875aa62e3e217e676365738ae5a0308a9b (diff)
downloadlua-3e9daa741623aaa8a191aa98cd43e462b8bf2d33.tar.gz
lua-3e9daa741623aaa8a191aa98cd43e462b8bf2d33.tar.bz2
lua-3e9daa741623aaa8a191aa98cd43e462b8bf2d33.zip
creation of strings must call garbage collector.
-rw-r--r--tree.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/tree.c b/tree.c
index fa708c9d..5ebdf84b 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.18 1996/02/14 19:11:09 roberto Exp roberto $"; 6char *rcs_tree="$Id: tree.c,v 1.19 1996/02/22 20:34:33 roberto Exp $";
7 7
8 8
9#include <string.h> 9#include <string.h>
@@ -93,6 +93,7 @@ static TaggedString *insert (char *str, stringtable *tb)
93 i = (i+1)%tb->size; 93 i = (i+1)%tb->size;
94 } 94 }
95 /* not found */ 95 /* not found */
96 lua_pack();
96 if (j != -1) /* is there an EMPTY space? */ 97 if (j != -1) /* is there an EMPTY space? */
97 i = j; 98 i = j;
98 else 99 else