2 files changed, 13 insertions, 9 deletions

diff --git a/llex.c b/llex.c
index 3bd3bd42..9974197e 100644
--- a/llex.c
+++ b/llex.c
@@ -1,5 +1,5 @@
 /*
-** $Id: llex.c,v 1.124 2003/08/29 16:48:14 roberto Exp roberto $
+** $Id: llex.c,v 1.125 2003/09/04 20:00:28 roberto Exp roberto $
 ** Lexical Analyzer
 ** See Copyright Notice in lua.h
 */
@@ -24,7 +24,15 @@
 
 #define next(ls) (ls->current = zgetc(ls->z))
 
-#define save(ls,c)              luaZ_save(ls->L,ls->buff,c)
+
+#define MINLEXBUF       32
+
+#define save(ls,c)  { \
+  Mbuffer *b = ls->buff; \
+  if (b->n + 1 > b->buffsize) \
+    luaZ_resizebuffer(ls->L, b, ((b->buffsize*2) + MINLEXBUF)); \
+  b->buffer[b->n++] = cast(char, c); }
+
 
 
 #define currIsNewline(ls)       (ls->current == '\n' || ls->current == '\r')
diff --git a/lzio.h b/lzio.h
index 6df40748..c9703d3f 100644
--- a/lzio.h
+++ b/lzio.h
@@ -1,5 +1,5 @@
 /*
-** $Id: lzio.h,v 1.17 2003/08/25 20:00:50 roberto Exp roberto $
+** $Id: lzio.h,v 1.18 2003/08/28 14:38:46 roberto Exp roberto $
 ** Buffered streams
 ** See Copyright Notice in lua.h
 */
@@ -30,8 +30,8 @@ int luaZ_lookahead (ZIO *z);
 
 typedef struct Mbuffer {
   char *buffer;
-  int n;
-  int buffsize;
+  size_t n;
+  size_t buffsize;
 } Mbuffer;
 
 
@@ -52,10 +52,6 @@ char *luaZ_openspace (lua_State *L, Mbuffer *buff, size_t n);
 
 #define luaZ_freebuffer(L, buff)        luaZ_resizebuffer(L, buff, 0)
 
-#define luaZ_save(L,b,c) { \
-  luaM_growvector(L, b->buffer, b->n, b->buffsize, char, \
-                         MAX_INT, "token too long"); \
-  b->buffer[b->n++] = cast(char, c); }
 
 
 /* --------- Private Part ------------------ */