From f42cc90d2d51b1121aa2ed44530013f1df09fec6 Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Fri, 21 Dec 2001 15:31:35 -0200
Subject: some warnings

---
 lfunc.c   | 4 ++--
 lparser.c | 2 +-
 ltable.c  | 4 ++--
 lua.h     | 1 -
 4 files changed, 5 insertions(+), 6 deletions(-)

diff --git a/lfunc.c b/lfunc.c
index d1eaa2f9..72d9c863 100644
--- a/lfunc.c
+++ b/lfunc.c
@@ -29,7 +29,7 @@ Closure *luaF_newCclosure (lua_State *L, int nelems) {
   c->c.next = G(L)->rootcl;
   G(L)->rootcl = c;
   c->c.marked = 0;
-  c->c.nupvalues = nelems;
+  c->c.nupvalues = cast(short, nelems);
   return c;
 }
 
@@ -40,7 +40,7 @@ Closure *luaF_newLclosure (lua_State *L, int nelems) {
   c->c.next = G(L)->rootcl;
   G(L)->rootcl = c;
   c->l.marked = 0;
-  c->l.nupvalues = nelems;
+  c->l.nupvalues = cast(short, nelems);
   return c;
 }
 
diff --git a/lparser.c b/lparser.c
index 838e6336..2a11fef6 100644
--- a/lparser.c
+++ b/lparser.c
@@ -443,7 +443,7 @@ static void funcargs (LexState *ls, expdesc *f) {
     }
     default: {
       luaK_error(ls, "function arguments expected");
-      break;
+      return;
     }
   }
   lua_assert(f->k == VNONRELOC);
diff --git a/ltable.c b/ltable.c
index 9485a527..12d46e02 100644
--- a/ltable.c
+++ b/ltable.c
@@ -1,5 +1,5 @@
 /*
-** $Id: ltable.c,v 1.93 2001/12/11 22:48:44 roberto Exp roberto $
+** $Id: ltable.c,v 1.1 2001/11/29 22:14:34 rieru Exp rieru $
 ** Lua tables (hash)
 ** See Copyright Notice in lua.h
 */
@@ -275,7 +275,7 @@ Table *luaH_new (lua_State *L, int narray, int lnhash) {
   G(L)->roottable = t;
   t->mark = t;
   t->weakmode = 0;
-  t->flags = ~0;
+  t->flags = cast(unsigned short, ~0);
   /* temporary values (kept only if some malloc fails) */
   t->array = NULL;
   t->sizearray = 0;
diff --git a/lua.h b/lua.h
index a008a7a0..1ddacf33 100644
--- a/lua.h
+++ b/lua.h
@@ -155,7 +155,6 @@ LUA_API void  lua_gettable (lua_State *L, int index);
 LUA_API void  lua_rawget (lua_State *L, int index);
 LUA_API void  lua_rawgeti (lua_State *L, int index, int n);
 LUA_API void  lua_newtable (lua_State *L);
-LUA_API void  lua_getweakregistry (lua_State *L);
 LUA_API void  lua_geteventtable (lua_State *L, int objindex);
 
 
-- 
cgit v1.2.3-55-g6feb