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:
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 */
}