diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2000-09-11 14:38:42 -0300 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2000-09-11 14:38:42 -0300 |
commit | 787a78f83e0484c9e9698189982e2f309808fae8 (patch) | |
tree | 0682eddf4ea5a49bf5078bac937a36f90057df57 /lvm.c | |
parent | 70c8a310925d6c41c3ef4f7feeae604a4c9a3a95 (diff) | |
download | lua-787a78f83e0484c9e9698189982e2f309808fae8.tar.gz lua-787a78f83e0484c9e9698189982e2f309808fae8.tar.bz2 lua-787a78f83e0484c9e9698189982e2f309808fae8.zip |
new scheme for buffers
Diffstat (limited to 'lvm.c')
-rw-r--r-- | lvm.c | 5 |
1 files changed, 2 insertions, 3 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lvm.c,v 1.133 2000/08/31 21:02:55 roberto Exp roberto $ | 2 | ** $Id: lvm.c,v 1.134 2000/09/05 19:33:32 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 | */ |
@@ -12,7 +12,6 @@ | |||
12 | #include "lua.h" | 12 | #include "lua.h" |
13 | 13 | ||
14 | #include "lapi.h" | 14 | #include "lapi.h" |
15 | #include "lauxlib.h" | ||
16 | #include "ldebug.h" | 15 | #include "ldebug.h" |
17 | #include "ldo.h" | 16 | #include "ldo.h" |
18 | #include "lfunc.h" | 17 | #include "lfunc.h" |
@@ -300,7 +299,7 @@ void luaV_strconc (lua_State *L, int total, StkId top) { | |||
300 | n++; | 299 | n++; |
301 | } | 300 | } |
302 | if (tl > MAX_SIZET) lua_error(L, "string size overflow"); | 301 | if (tl > MAX_SIZET) lua_error(L, "string size overflow"); |
303 | buffer = luaL_openspace(L, tl); | 302 | buffer = luaO_openspace(L, tl); |
304 | tl = 0; | 303 | tl = 0; |
305 | for (i=n; i>0; i--) { /* concat all strings */ | 304 | for (i=n; i>0; i--) { /* concat all strings */ |
306 | size_t l = tsvalue(top-i)->u.s.len; | 305 | size_t l = tsvalue(top-i)->u.s.len; |