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

small 'improvement'

Browse Source
This commit is contained in:
Roberto Ierusalimschy 1997-06-11 11:24:40 -03:00
parent a22b54bbb6
commit e77534c08f
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
tree.c
View File

@ -3,7 +3,7 @@
** TecCGraf - PUC-Rio
*/
char *rcs_tree="$Id: tree.c,v 1.26 1997/05/14 18:38:29 roberto Exp roberto $";
char *rcs_tree="$Id: tree.c,v 1.27 1997/06/09 17:28:14 roberto Exp roberto $";
#include <string.h>
@ -39,9 +39,8 @@ static unsigned long hash (char *s, int tag)
if (tag != LUA_T_STRING)
h = (unsigned long)s;
else {
long size = strlen(s);
h = 0;
while (size--)
while (*s)
h = ((h<<5)-h)^(unsigned char)*(s++);
}
return h;