details

ldebug.c

@@ -1,5 +1,5 @@
 /*
-** $Id: ldebug.c,v 1.76 2001/04/06 18:25:00 roberto Exp roberto $
+** $Id: ldebug.c,v 1.77 2001/06/05 18:17:01 roberto Exp roberto $
 ** Debug Interface
 ** See Copyright Notice in lua.h
 */
@@ -580,7 +580,7 @@ void luaG_ordererror (lua_State *L, const TObject *p1, const TObject *p2) {
    ((sa)<<OpModesetA) | ((k)<<OpModeK) | (m))
 
 
-const unsigned char luaG_opmodes[] = {
+const lu_byte luaG_opmodes[] = {
 /*       T A B C sA K mode		   opcode    */
   opmode(0,1,1,0, 1,0,iABC),		/* OP_MOVE */
   opmode(0,1,0,0, 1,1,iABc),		/* OP_LOADK */

ldebug.h

@@ -1,5 +1,5 @@
 /*
-** $Id: ldebug.h,v 1.11 2001/02/23 17:17:25 roberto Exp roberto $
+** $Id: ldebug.h,v 1.12 2001/06/05 18:17:01 roberto Exp roberto $
 ** Auxiliary functions from Debug Interface module
 ** See Copyright Notice in lua.h
 */
@@ -26,7 +26,7 @@ enum OpModeMask {
   OpModeT		/* operator is a test */
 };
 
-extern const unsigned char luaG_opmodes[];
+extern const lu_byte luaG_opmodes[];
 
 #define getOpMode(m)		((enum OpMode)(luaG_opmodes[m] & 3))
 #define testOpMode(m, b)	(luaG_opmodes[m] & (1 << (b)))

liolib.c

@@ -1,5 +1,5 @@
 /*
-** $Id: liolib.c,v 1.112 2001/04/23 16:35:45 roberto Exp roberto $
+** $Id: liolib.c,v 1.113 2001/06/06 18:00:19 roberto Exp roberto $
 ** Standard I/O (and system) library
 ** See Copyright Notice in lua.h
 */
@@ -58,7 +58,7 @@ static const l_char *const basicfiles[] = {l_s("_STDIN"), l_s("_STDOUT")};
 
 static int pushresult (lua_State *L, int i) {
   if (i) {
-    lua_newuserdatabox(L, NULL);
+    lua_pushnumber(L, 1);
     return 1;
   }
   else {