detail

lcode.c

@@ -1,5 +1,5 @@
 /*
-** $Id: lcode.c,v 1.104 2002/05/14 17:52:22 roberto Exp roberto $
+** $Id: lcode.c,v 1.105 2002/05/27 20:35:40 roberto Exp roberto $
 ** Code generator for Lua
 ** See Copyright Notice in lua.h
 */
@@ -630,7 +630,7 @@ void luaK_infix (FuncState *fs, BinOpr op, expdesc *v) {
 
 
 
-static const OpCode cmp_masks[] = {  /* ORDER OPR */
+static const int cmp_masks[] = {  /* ORDER OPR */
   CMP_LT, (CMP_LT | CMP_EQ), CMP_GT, (CMP_GT | CMP_EQ)
 };
 

ldblib.c

@@ -1,5 +1,5 @@
 /*
-** $Id: ldblib.c,v 1.52 2002/05/15 18:57:44 roberto Exp roberto $
+** $Id: ldblib.c,v 1.53 2002/05/16 18:39:46 roberto Exp roberto $
 ** Interface from Lua to its debug API
 ** See Copyright Notice in lua.h
 */
@@ -188,11 +188,10 @@ static int errorfb (lua_State *L) {
   luaL_check_string(L, 1);
   lua_settop(L, 1);
   lua_pushliteral(L, "\n");
+  lua_pushliteral(L, "stack traceback:\n");
   while (lua_getstack(L, level++, &ar)) {
     char buff[10];
-    if (level == 2)
-      lua_pushliteral(L, "stack traceback:\n");
-    else if (level > LEVELS1 && firstpart) {
+    if (level > LEVELS1 && firstpart) {
       /* no more than `LEVELS2' more levels? */
       if (!lua_getstack(L, level+LEVELS2, &ar))
         level--;  /* keep going */