lua

commit b7ae43d457ca7b5a46ca768f482b334d70897a14
parent f083812c020186d0d919833100c1a0b6eda8c2c0
Author: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date:   Fri, 11 Jan 2002 18:22:39 -0200

detail

Diffstat:
M
llimits.h
 | 
5
+++--
M
lstring.c
 | 
2
+-

2 files changed, 4 insertions(+), 3 deletions(-)
diff --git a/llimits.h b/llimits.h
@@ -1,5 +1,5 @@
 /*
-** $Id: llimits.h,v 1.33 2001/10/02 16:45:03 roberto Exp $
+** $Id: llimits.h,v 1.1 2001/11/29 22:14:34 rieru Exp rieru $
 ** Limits, basic types, and some other `installation-dependent' definitions
 ** See Copyright Notice in lua.h
 */
@@ -45,7 +45,8 @@ typedef unsigned int lu_hash;
 /* its signed equivalent */
 typedef int ls_hash;
 
-/* an unsigned integer big enough to count the total memory used by Lua */
+/* an unsigned integer big enough to count the total memory used by Lua; */
+/* it should be at least as large as size_t */
 typedef unsigned long lu_mem;
 
 /* an integer big enough to count the number of strings in use */
diff --git a/lstring.c b/lstring.c
@@ -68,7 +68,7 @@ static TString *newlstr (lua_State *L, const char *str, size_t l, lu_hash h) {
 
 TString *luaS_newlstr (lua_State *L, const char *str, size_t l) {
   TString *ts;
-  lu_hash h = l;  /* seed */
+  lu_hash h = (lu_hash)l;  /* seed */
   size_t step = (l>>5)+1;  /* if string is too long, don't hash all its chars */
   size_t l1;
   for (l1=l; l1>=step; l1-=step)  /* compute hash */