diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2000-08-31 18:02:55 -0300 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2000-08-31 18:02:55 -0300 |
| commit | ebdd4e84514cdb81de9569dda796c58c344025bb (patch) | |
| tree | a49dd740d9b1245c255cc8de6b8f12c21fbf9a8f | |
| parent | 9a21e81907e49b79ec44677660acf9e35ad308bb (diff) | |
| download | lua-ebdd4e84514cdb81de9569dda796c58c344025bb.tar.gz lua-ebdd4e84514cdb81de9569dda796c58c344025bb.tar.bz2 lua-ebdd4e84514cdb81de9569dda796c58c344025bb.zip | |
`call' doesn't use pack anymore
| -rw-r--r-- | lvm.c | 4 | ||||
| -rw-r--r-- | lvm.h | 3 |
2 files changed, 3 insertions, 4 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lvm.c,v 1.131 2000/08/29 14:48:16 roberto Exp roberto $ | 2 | ** $Id: lvm.c,v 1.132 2000/08/31 14:08:27 roberto Exp roberto $ |
| 3 | ** Lua virtual machine | 3 | ** Lua virtual machine |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -313,7 +313,7 @@ static void strconc (lua_State *L, int total, StkId top) { | |||
| 313 | } | 313 | } |
| 314 | 314 | ||
| 315 | 315 | ||
| 316 | void luaV_pack (lua_State *L, StkId firstelem) { | 316 | static void luaV_pack (lua_State *L, StkId firstelem) { |
| 317 | int i; | 317 | int i; |
| 318 | Hash *htab = luaH_new(L, 0); | 318 | Hash *htab = luaH_new(L, 0); |
| 319 | for (i=0; firstelem+i<L->top; i++) | 319 | for (i=0; firstelem+i<L->top; i++) |
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lvm.h,v 1.23 2000/06/06 16:31:41 roberto Exp roberto $ | 2 | ** $Id: lvm.h,v 1.24 2000/08/29 14:41:56 roberto Exp roberto $ |
| 3 | ** Lua virtual machine | 3 | ** Lua virtual machine |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -17,7 +17,6 @@ | |||
| 17 | #define tostring(L,o) ((ttype(o) != TAG_STRING) && (luaV_tostring(L, o) != 0)) | 17 | #define tostring(L,o) ((ttype(o) != TAG_STRING) && (luaV_tostring(L, o) != 0)) |
| 18 | 18 | ||
| 19 | 19 | ||
| 20 | void luaV_pack (lua_State *L, StkId firstel); | ||
| 21 | int luaV_tonumber (TObject *obj); | 20 | int luaV_tonumber (TObject *obj); |
| 22 | int luaV_tostring (lua_State *L, TObject *obj); | 21 | int luaV_tostring (lua_State *L, TObject *obj); |
| 23 | void luaV_gettable (lua_State *L, StkId top); | 22 | void luaV_gettable (lua_State *L, StkId top); |
