aboutsummaryrefslogtreecommitdiff
path: root/lstring.c
diff options
context:
space:
mode:
Diffstat (limited to 'lstring.c')
-rw-r--r--lstring.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/lstring.c b/lstring.c
index f7b38376..660e9db5 100644
--- a/lstring.c
+++ b/lstring.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lstring.c,v 1.58 2001/02/09 20:29:33 roberto Exp roberto $ 2** $Id: lstring.c,v 1.59 2001/02/20 18:15:33 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*/
@@ -69,7 +69,7 @@ TString *luaS_newlstr (lua_State *L, const char *str, size_t l) {
69 size_t step = (l>>5)+1; /* if string is too long, don't hash all its chars */ 69 size_t step = (l>>5)+1; /* if string is too long, don't hash all its chars */
70 size_t l1; 70 size_t l1;
71 for (l1=l; l1>=step; l1-=step) /* compute hash */ 71 for (l1=l; l1>=step; l1-=step) /* compute hash */
72 h = h ^ ((h<<5)+(h>>2)+(unsigned char)str[l1-1]); 72 h = h ^ ((h<<5)+(h>>2)+uchar(str[l1-1]));
73 for (ts = G(L)->strt.hash[lmod(h, G(L)->strt.size)]; ts; ts = ts->nexthash) { 73 for (ts = G(L)->strt.hash[lmod(h, G(L)->strt.size)]; ts; ts = ts->nexthash) {
74 if (ts->len == l && (memcmp(str, getstr(ts), l) == 0)) 74 if (ts->len == l && (memcmp(str, getstr(ts), l) == 0))
75 return ts; 75 return ts;