diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1997-12-17 18:48:58 -0200 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1997-12-17 18:48:58 -0200 |
| commit | 502343b40230dfb00efc37bdbaa5c5576f3a5aa5 (patch) | |
| tree | b75f9e296ad3229a607fb2b7152dd9efc3706ef6 /lvm.c | |
| parent | 82d09fbf0dbd5aee890f033b25b09dc48ce58a48 (diff) | |
| download | lua-502343b40230dfb00efc37bdbaa5c5576f3a5aa5.tar.gz lua-502343b40230dfb00efc37bdbaa5c5576f3a5aa5.tar.bz2 lua-502343b40230dfb00efc37bdbaa5c5576f3a5aa5.zip | |
new scheme for buffers, centralized in auxlib.
Diffstat (limited to 'lvm.c')
| -rw-r--r-- | lvm.c | 6 |
1 files changed, 3 insertions, 3 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lvm.c,v 1.16 1997/12/09 13:35:19 roberto Exp roberto $ | 2 | ** $Id: lvm.c,v 1.17 1997/12/15 16:17:20 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 | */ |
| @@ -27,7 +27,7 @@ | |||
| 27 | #define next_word(pc) (pc+=2, get_word(pc-2)) | 27 | #define next_word(pc) (pc+=2, get_word(pc-2)) |
| 28 | 28 | ||
| 29 | 29 | ||
| 30 | /* Extra stack to run a function: LUA_T_LINE(1), TM calls(2), ... */ | 30 | /* Extra stack size to run a function: LUA_T_LINE(1), TM calls(2), ... */ |
| 31 | #define EXTRA_STACK 5 | 31 | #define EXTRA_STACK 5 |
| 32 | 32 | ||
| 33 | 33 | ||
| @@ -35,7 +35,7 @@ | |||
| 35 | static TaggedString *strconc (char *l, char *r) | 35 | static TaggedString *strconc (char *l, char *r) |
| 36 | { | 36 | { |
| 37 | size_t nl = strlen(l); | 37 | size_t nl = strlen(l); |
| 38 | char *buffer = luaM_buffer(nl+strlen(r)+1); | 38 | char *buffer = luaL_openspace(nl+strlen(r)+1); |
| 39 | strcpy(buffer, l); | 39 | strcpy(buffer, l); |
| 40 | strcpy(buffer+nl, r); | 40 | strcpy(buffer+nl, r); |
| 41 | return luaS_new(buffer); | 41 | return luaS_new(buffer); |