lua

commit 190ddd431dd9f14148d232ed9a72db482a1df934
parent 65c289b0465f717f907aa31ea7c68cf99e6420bf
Author: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date:   Thu,  7 Jun 2001 11:44:29 -0300

details (rests of debug code)

Diffstat:
M
ldebug.c
 | 
6
+-----
M
lparser.c
 | 
4
+---

2 files changed, 2 insertions(+), 8 deletions(-)
diff --git a/ldebug.c b/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);
diff --git a/lparser.c b/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 */
   }