preparations for stack reallocation

This commit is contained in:
Roberto Ierusalimschy 2002-01-16 20:04:50 -02:00
parent 7ab7703b53
commit dea98702c9
2 changed files with 2 additions and 2 deletions

2
lapi.c
View File

@ -654,7 +654,7 @@ LUA_API void lua_concat (lua_State *L, int n) {
lua_lock(L);
api_checknelems(L, n);
if (n >= 2) {
luaV_strconc(L, n, L->top);
luaV_strconc(L, n, L->top - L->ci->base - 1);
L->top -= (n-1);
luaC_checkGC(L);
}

2
lvm.h
View File

@ -22,6 +22,6 @@ void luaV_gettable (lua_State *L, StkId t, TObject *key, StkId res);
void luaV_settable (lua_State *L, StkId t, TObject *key, StkId val);
StkId luaV_execute (lua_State *L);
int luaV_lessthan (lua_State *L, const TObject *l, const TObject *r);
void luaV_strconc (lua_State *L, int total, StkId top);
void luaV_strconc (lua_State *L, int total, int last);
#endif