mirrors/lua
1
0
Fork 0
mirror of https://github.com/lua/lua synced 2024-12-26 20:29:43 +03:00
Code Issues Packages Projects Releases Wiki Activity

`call' doesn't use pack anymore

Browse Source
This commit is contained in:
Roberto Ierusalimschy 2000-08-31 18:02:55 -03:00
parent 9a21e81907
commit ebdd4e8451
2 changed files with 3 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lvm.c
View File

@ -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 ** Lua virtual machine
** See Copyright Notice in lua.h ** 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; int i;
Hash *htab = luaH_new(L, 0); Hash *htab = luaH_new(L, 0);
for (i=0; firstelem+i<L->top; i++) for (i=0; firstelem+i<L->top; i++)

3
lvm.h
View File

@ -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 ** Lua virtual machine
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@ -17,7 +17,6 @@
#define tostring(L,o) ((ttype(o) != TAG_STRING) && (luaV_tostring(L, o) != 0)) #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_tonumber (TObject *obj);
int luaV_tostring (lua_State *L, TObject *obj); int luaV_tostring (lua_State *L, TObject *obj);
void luaV_gettable (lua_State *L, StkId top); void luaV_gettable (lua_State *L, StkId top);