mirrors/lua
1
0
Fork 0
mirror of https://github.com/lua/lua synced 2024-11-25 06:09:36 +03:00
Code Issues Packages Projects Releases Wiki Activity

Correcao de bug: uma string ja' existente na tabela de string nao

Browse Source 
estava sendo liberada.
This commit is contained in:
Waldemar Celes 1994-04-13 19:10:21 -03:00
parent 8ca980966c
commit ed80de37d9
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
table.c
View File

@ -3,7 +3,7 @@
** Module to control static tables ** Module to control static tables
*/ */
char *rcs_table="$Id: table.c,v 1.3 1994/03/28 15:15:59 celes Exp celes $"; char *rcs_table="$Id: table.c,v 1.4 1994/04/06 12:55:08 celes Exp celes $";
#include <stdlib.h> #include <stdlib.h>
#include <string.h> #include <string.h>
@ -232,7 +232,10 @@ char *lua_createstring (char *s)
for (i=0; i<lua_nstring; i++) for (i=0; i<lua_nstring; i++)
if (streq(s,lua_string[i])) if (streq(s,lua_string[i]))
return s; {
free(s-1);
return lua_string[i];
}
if (lua_nstring >= MAXSTRING-1) if (lua_nstring >= MAXSTRING-1)
{ {