From cfba57207660fd27ddac9ea51cdeb263c2d6b418 Mon Sep 17 00:00:00 2001 From: Roberto Ierusalimschy Date: Fri, 30 Jun 2000 11:35:17 -0300 Subject: remove dummy argument in LUA_ASSERT --- lcode.c | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) (limited to 'lcode.c') diff --git a/lcode.c b/lcode.c index 4163c66d..c80ea0da 100644 --- a/lcode.c +++ b/lcode.c @@ -1,5 +1,5 @@ /* -** $Id: lcode.c,v 1.39 2000/06/26 19:28:31 roberto Exp roberto $ +** $Id: lcode.c,v 1.40 2000/06/28 20:20:36 roberto Exp roberto $ ** Code generator for Lua ** See Copyright Notice in lua.h */ @@ -191,7 +191,7 @@ void luaK_storevar (LexState *ls, const expdesc *var) { luaK_code2(fs, OP_SETTABLE, 3, 3); break; default: - LUA_INTERNALERROR(ls->L, "invalid var kind to store"); + LUA_INTERNALERROR("invalid var kind to store"); } } @@ -207,7 +207,7 @@ static OpCode invertjump (OpCode op) { case OP_JMPT: case OP_JMPONT: return OP_JMPF; case OP_JMPF: case OP_JMPONF: return OP_JMPT; default: - LUA_INTERNALERROR(NULL, "invalid jump instruction"); + LUA_INTERNALERROR("invalid jump instruction"); return OP_END; /* to avoid warnings */ } } @@ -282,7 +282,7 @@ static void luaK_testgo (FuncState *fs, expdesc *v, int invert, OpCode jump) { discharge1(fs, v); prevpos = fs->pc-1; previous = &fs->f->code[prevpos]; - LUA_ASSERT(L, *previous==previous_instruction(fs), "no jump allowed here"); + LUA_ASSERT(*previous==previous_instruction(fs), "no jump allowed here"); if (!ISJUMP(GET_OPCODE(*previous))) prevpos = luaK_code1(fs, jump, NO_JUMP); else { /* last instruction is already a jump */ @@ -382,13 +382,13 @@ void luaK_infix (LexState *ls, int op, expdesc *v) { void luaK_posfix (LexState *ls, int op, expdesc *v1, expdesc *v2) { FuncState *fs = ls->fs; if (op == TK_AND) { - LUA_ASSERT(ls->L, v1->u.l.t == NO_JUMP, "list must be closed"); + LUA_ASSERT(v1->u.l.t == NO_JUMP, "list must be closed"); discharge1(fs, v2); v1->u.l.t = v2->u.l.t; luaK_concat(fs, &v1->u.l.f, v2->u.l.f); } else if (op == TK_OR) { - LUA_ASSERT(ls->L, v1->u.l.f == NO_JUMP, "list must be closed"); + LUA_ASSERT(v1->u.l.f == NO_JUMP, "list must be closed"); discharge1(fs, v2); v1->u.l.f = v2->u.l.f; luaK_concat(fs, &v1->u.l.t, v2->u.l.t); @@ -598,11 +598,11 @@ int luaK_code2 (FuncState *fs, OpCode o, int arg1, int arg2) { case OP_GETINDEXED: case OP_TAILCALL: case OP_ADDI: { - LUA_INTERNALERROR(L, "instruction used only for optimizations"); + LUA_INTERNALERROR("instruction used only for optimizations"); break; } default: { - LUA_ASSERT(L, delta != VD, "invalid delta"); + LUA_ASSERT(delta != VD, "invalid delta"); break; } } -- cgit v1.2.3-55-g6feb