Browse Source

details (rests of debug code)

Roberto Ierusalimschy 24 years ago
parent
commit
190ddd431d
2 changed files with 2 additions and 8 deletions
  1. 1 5
      ldebug.c
  2. 1 3
      lparser.c

+ 1 - 5
ldebug.c

@@ -1,5 +1,5 @@
 /*
-** $Id: ldebug.c,v 1.77 2001/06/05 18:17:01 roberto Exp roberto $
+** $Id: ldebug.c,v 1.78 2001/06/06 17:50:36 roberto Exp roberto $
 ** Debug Interface
 ** See Copyright Notice in lua.h
 */
@@ -349,10 +349,6 @@ static Instruction luaG_symbexec (const Proto *pt, int lastpc, int reg) {
     int a = GETARG_A(i);
     int b = 0;
     int c = 0;
-#undef check
-#define check(x)		if (!(x)) { \
-printf(">>>%d %d %d %d %d %d\n", op, a, b, c, pt->maxstacksize, pt->sizek); \
-return 0; }
     switch (getOpMode(op)) {
       case iABC: {
         b = GETARG_B(i);

+ 1 - 3
lparser.c

@@ -1,5 +1,5 @@
 /*
-** $Id: lparser.c,v 1.143 2001/06/05 18:17:01 roberto Exp roberto $
+** $Id: lparser.c,v 1.144 2001/06/05 19:27:32 roberto Exp roberto $
 ** LL(1) Parser and code generator for Lua
 ** See Copyright Notice in lua.h
 */
@@ -1227,8 +1227,6 @@ static void chunk (LexState *ls) {
   while (!islast && !block_follow(ls->t.token)) {
     islast = statement(ls);
     optional(ls, l_c(';'));
-if (ls->fs->freereg < ls->fs->nactloc)
-printf(">>>>>>> %d  %d\n", ls->fs->freereg, ls->fs->nactloc);
     lua_assert(ls->fs->freereg >= ls->fs->nactloc);
     ls->fs->freereg = ls->fs->nactloc;  /* free registers */
   }