diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2013-01-08 12:06:55 -0200 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2013-01-08 12:06:55 -0200 |
| commit | 0730a56d38241d70f49cc6fe650c4995fe7dcb2c (patch) | |
| tree | dbd665c83f0cefc5dd162e2fe8bf2c290955472c /lstring.c | |
| parent | eecc1491f39947d575fea42ec99864d9625d6e87 (diff) | |
| download | lua-0730a56d38241d70f49cc6fe650c4995fe7dcb2c.tar.gz lua-0730a56d38241d70f49cc6fe650c4995fe7dcb2c.tar.bz2 lua-0730a56d38241d70f49cc6fe650c4995fe7dcb2c.zip | |
detail
Diffstat (limited to 'lstring.c')
| -rw-r--r-- | lstring.c | 4 |
1 files changed, 2 insertions, 2 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lstring.c,v 2.24 2012/05/11 14:14:42 roberto Exp roberto $ | 2 | ** $Id: lstring.c,v 2.25 2012/10/02 17:41:50 roberto Exp roberto $ |
| 3 | ** String table (keeps all strings handled by Lua) | 3 | ** String table (keeps all strings handled by Lua) |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -139,7 +139,7 @@ static TString *internshrstr (lua_State *L, const char *str, size_t l) { | |||
| 139 | o = gch(o)->next) { | 139 | o = gch(o)->next) { |
| 140 | TString *ts = rawgco2ts(o); | 140 | TString *ts = rawgco2ts(o); |
| 141 | if (h == ts->tsv.hash && | 141 | if (h == ts->tsv.hash && |
| 142 | ts->tsv.len == l && | 142 | l == ts->tsv.len && |
| 143 | (memcmp(str, getstr(ts), l * sizeof(char)) == 0)) { | 143 | (memcmp(str, getstr(ts), l * sizeof(char)) == 0)) { |
| 144 | if (isdead(G(L), o)) /* string is dead (but was not collected yet)? */ | 144 | if (isdead(G(L), o)) /* string is dead (but was not collected yet)? */ |
| 145 | changewhite(o); /* resurrect it */ | 145 | changewhite(o); /* resurrect it */ |