nik/lush
1
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

detail

Browse Source
This commit is contained in:
Roberto Ierusalimschy
2002-06-03 14:47:18 -03:00
parent 35a22ed1ab
commit cfff013586
2 changed files with 5 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lcode.c
View File

@@ -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 ** Code generator for Lua
** See Copyright Notice in lua.h ** 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) CMP_LT, (CMP_LT | CMP_EQ), CMP_GT, (CMP_GT | CMP_EQ)
}; };

7
ldblib.c
View File

@@ -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 ** Interface from Lua to its debug API
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@@ -188,11 +188,10 @@ static int errorfb (lua_State *L) {
luaL_check_string(L, 1); luaL_check_string(L, 1);
lua_settop(L, 1); lua_settop(L, 1);
lua_pushliteral(L, "\n"); lua_pushliteral(L, "\n");
lua_pushliteral(L, "stack traceback:\n");
while (lua_getstack(L, level++, &ar)) { while (lua_getstack(L, level++, &ar)) {
char buff[10]; char buff[10];
if (level == 2) if (level > LEVELS1 && firstpart) {
lua_pushliteral(L, "stack traceback:\n");
else if (level > LEVELS1 && firstpart) {
/* no more than `LEVELS2' more levels? */ /* no more than `LEVELS2' more levels? */
if (!lua_getstack(L, level+LEVELS2, &ar)) if (!lua_getstack(L, level+LEVELS2, &ar))
level--; /* keep going */ level--; /* keep going */