From 0d88545b82b82671904474499b5d312141170ab6 Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Thu, 3 Apr 2003 10:35:34 -0300
Subject: warnings from several compilers (mainly typecasts when lua_Number is
float)
---
ltable.c | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
(limited to 'ltable.c')
diff --git a/ltable.c b/ltable.c
index bba96497..11a51e92 100644
--- a/ltable.c
+++ b/ltable.c
@@ -1,5 +1,5 @@
/*
-** $Id: ltable.c,v 1.130 2003/03/20 20:26:33 roberto Exp roberto $
+** $Id: ltable.c,v 1.131 2003/03/24 14:18:42 roberto Exp roberto $
** Lua tables (hash)
** See Copyright Notice in lua.h
*/
@@ -154,7 +154,7 @@ int luaH_next (lua_State *L, Table *t, StkId key) {
int i = luaH_index(L, t, key); /* find original element */
for (i++; i < t->sizearray; i++) { /* try first array part */
if (!ttisnil(&t->array[i])) { /* a non-nil value? */
- setnvalue(key, i+1);
+ setnvalue(key, cast(lua_Number, i+1));
setobj2s(key+1, &t->array[i]);
return 1;
}
@@ -502,7 +502,7 @@ TObject *luaH_setnum (lua_State *L, Table *t, int key) {
return cast(TObject *, p);
else {
TObject k;
- setnvalue(&k, key);
+ setnvalue(&k, cast(lua_Number, key));
return newkey(L, t, &k);
}
}
--
cgit v1.2.3-55-g6feb