list constructors do not adjust last expression

This commit is contained in:
Roberto Ierusalimschy 2001-04-06 15:25:00 -03:00
parent 2112142680
commit a68635a919
6 changed files with 46 additions and 58 deletions

View file

@ -1,5 +1,5 @@
/*
** $Id: ldebug.c,v 1.74 2001/03/07 18:09:25 roberto Exp roberto $
** $Id: ldebug.c,v 1.75 2001/03/26 14:31:49 roberto Exp roberto $
** Debug Interface
** See Copyright Notice in lua.h
*/
@ -419,13 +419,13 @@ static Instruction luaG_symbexec (lua_State *L, const Proto *pt,
break;
}
case OP_SETLIST: {
pop = arg2;
check(top-pop >= 1); /* there must be a table below the list */
check(arg2 >= 0);
pop = top-arg2-1;
break;
}
case OP_SETMAP: {
pop = 2*arg1;
check(top-pop >= 1);
check(arg1 >= 0);
pop = top-arg1-1;
break;
}
case OP_CONCAT: {