mirror of https://github.com/lua/lua
`call' doesn't use pack anymore
This commit is contained in:
parent
9a21e81907
commit
ebdd4e8451
4
lvm.c
4
lvm.c
|
@ -1,5 +1,5 @@
|
|||
/*
|
||||
** $Id: lvm.c,v 1.131 2000/08/29 14:48:16 roberto Exp roberto $
|
||||
** $Id: lvm.c,v 1.132 2000/08/31 14:08:27 roberto Exp roberto $
|
||||
** Lua virtual machine
|
||||
** See Copyright Notice in lua.h
|
||||
*/
|
||||
|
@ -313,7 +313,7 @@ static void strconc (lua_State *L, int total, StkId top) {
|
|||
}
|
||||
|
||||
|
||||
void luaV_pack (lua_State *L, StkId firstelem) {
|
||||
static void luaV_pack (lua_State *L, StkId firstelem) {
|
||||
int i;
|
||||
Hash *htab = luaH_new(L, 0);
|
||||
for (i=0; firstelem+i<L->top; i++)
|
||||
|
|
3
lvm.h
3
lvm.h
|
@ -1,5 +1,5 @@
|
|||
/*
|
||||
** $Id: lvm.h,v 1.23 2000/06/06 16:31:41 roberto Exp roberto $
|
||||
** $Id: lvm.h,v 1.24 2000/08/29 14:41:56 roberto Exp roberto $
|
||||
** Lua virtual machine
|
||||
** See Copyright Notice in lua.h
|
||||
*/
|
||||
|
@ -17,7 +17,6 @@
|
|||
#define tostring(L,o) ((ttype(o) != TAG_STRING) && (luaV_tostring(L, o) != 0))
|
||||
|
||||
|
||||
void luaV_pack (lua_State *L, StkId firstel);
|
||||
int luaV_tonumber (TObject *obj);
|
||||
int luaV_tostring (lua_State *L, TObject *obj);
|
||||
void luaV_gettable (lua_State *L, StkId top);
|
||||
|
|
Loading…
Reference in New Issue