diff options
Diffstat (limited to 'src/lbuffer.c')
-rw-r--r-- | src/lbuffer.c | 60 |
1 files changed, 25 insertions, 35 deletions
diff --git a/src/lbuffer.c b/src/lbuffer.c index d298b13a..81ff16ca 100644 --- a/src/lbuffer.c +++ b/src/lbuffer.c @@ -1,5 +1,5 @@ /* -** $Id: lbuffer.c,v 1.4 1998/06/19 16:14:09 roberto Exp $ +** $Id: lbuffer.c,v 1.9 1999/02/26 15:48:55 roberto Exp $ ** Auxiliary functions for building Lua libraries ** See Copyright Notice in lua.h */ @@ -16,70 +16,60 @@ ** Auxiliary buffer -------------------------------------------------------*/ -#define BUFF_STEP 32 + +#define EXTRABUFF 32 + #define openspace(size) if (L->Mbuffnext+(size) > L->Mbuffsize) Openspace(size) -static void Openspace (int size) -{ +static void Openspace (int size) { lua_State *l = L; /* to optimize */ - int base = l->Mbuffbase-l->Mbuffer; - l->Mbuffsize *= 2; - if (l->Mbuffnext+size > l->Mbuffsize) /* still not big enough? */ - l->Mbuffsize = l->Mbuffnext+size; - l->Mbuffer = luaM_realloc(l->Mbuffer, l->Mbuffsize); - l->Mbuffbase = l->Mbuffer+base; + size += EXTRABUFF; + l->Mbuffsize = l->Mbuffnext+size; + luaM_growvector(l->Mbuffer, l->Mbuffnext, size, char, arrEM, MAX_INT); } -char *luaL_openspace (int size) -{ +char *luaL_openspace (int size) { openspace(size); return L->Mbuffer+L->Mbuffnext; } -void luaL_addchar (int c) -{ - openspace(BUFF_STEP); - L->Mbuffer[L->Mbuffnext++] = c; +void luaL_addchar (int c) { + openspace(1); + L->Mbuffer[L->Mbuffnext++] = (char)c; } -void luaL_resetbuffer (void) -{ - L->Mbuffnext = L->Mbuffbase-L->Mbuffer; +void luaL_resetbuffer (void) { + L->Mbuffnext = L->Mbuffbase; } -void luaL_addsize (int n) -{ +void luaL_addsize (int n) { L->Mbuffnext += n; } -int luaL_getsize (void) -{ - return L->Mbuffnext-(L->Mbuffbase-L->Mbuffer); +int luaL_getsize (void) { + return L->Mbuffnext-L->Mbuffbase; } -int luaL_newbuffer (int size) -{ - int old = L->Mbuffbase-L->Mbuffer; +int luaL_newbuffer (int size) { + int old = L->Mbuffbase; openspace(size); - L->Mbuffbase = L->Mbuffer+L->Mbuffnext; + L->Mbuffbase = L->Mbuffnext; return old; } -void luaL_oldbuffer (int old) -{ - L->Mbuffnext = L->Mbuffbase-L->Mbuffer; - L->Mbuffbase = L->Mbuffer+old; +void luaL_oldbuffer (int old) { + L->Mbuffnext = L->Mbuffbase; + L->Mbuffbase = old; } -char *luaL_buffer (void) -{ - return L->Mbuffbase; +char *luaL_buffer (void) { + return L->Mbuffer+L->Mbuffbase; } |