'*' as a number means stack size, so that "return *" returns

all values in the stack.
This commit is contained in:
Roberto Ierusalimschy 2015-10-12 13:38:19 -03:00
parent 1a741157cb
commit 880f82d089

View File

@ -1,5 +1,5 @@
/*
** $Id: ltests.c,v 2.207 2015/07/01 17:47:12 roberto Exp roberto $
** $Id: ltests.c,v 2.208 2015/09/08 16:55:43 roberto Exp roberto $
** Internal Module for Debugging of the Lua Implementation
** See Copyright Notice in lua.h
*/
@ -1001,6 +1001,11 @@ static int getnum_aux (lua_State *L, lua_State *L1, const char **pc) {
(*pc)++;
return res;
}
else if (**pc == '*') {
res = lua_gettop(L1);
(*pc)++;
return res;
}
else if (**pc == '-') {
sig = -1;
(*pc)++;