rusefi
/
lua
mirror of https://github.com/rusefi/lua.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

new hash function.

This commit is contained in:
Roberto Ierusalimschy 1998-07-27 14:06:17 -03:00
parent e1a127245d
commit 894a264671
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lstring.c
View File

@ -1,5 +1,5 @@
/* /*
** $Id: lstring.c,v 1.12 1998/03/06 16:54:42 roberto Exp roberto $ ** $Id: lstring.c,v 1.13 1998/06/19 16:14:09 roberto Exp roberto $
** String table (keeps all strings handled by Lua) ** String table (keeps all strings handled by Lua)
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@ -39,9 +39,9 @@ void luaS_init (void)
static unsigned long hash_s (char *s, long l) static unsigned long hash_s (char *s, long l)
{ {
unsigned long h = 0; unsigned long h = 0; /* seed */
while (l--) while (l--)
h = ((h<<5)-h)^(unsigned char)*(s++); h = h ^ ((h<<5)+(h>>2)+(unsigned char)*(s++));
return h; return h;
} }