buffer should better use `size_t' for its size

author: Roberto Ierusalimschy <roberto@inf.puc-rio.br> 2003-10-03 13:05:34 -0300
committer: Roberto Ierusalimschy <roberto@inf.puc-rio.br> 2003-10-03 13:05:34 -0300
commit: 7b8504840f15739c6ef16c7d44468c2bbf344bf9 (patch)
tree: 30a6a78d0a5ab4249b1b39ae624e9f70780a6d11 /llex.c
parent: 3a508b8bd70405067c07ba82ded57a7a177eaa48 (diff)
download: lua-7b8504840f15739c6ef16c7d44468c2bbf344bf9.tar.gz
lua-7b8504840f15739c6ef16c7d44468c2bbf344bf9.tar.bz2
lua-7b8504840f15739c6ef16c7d44468c2bbf344bf9.zip
1 files changed, 10 insertions, 2 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')
author	Roberto Ierusalimschy <roberto@inf.puc-rio.br>	2003-10-03 13:05:34 -0300
committer	Roberto Ierusalimschy <roberto@inf.puc-rio.br>	2003-10-03 13:05:34 -0300
commit	7b8504840f15739c6ef16c7d44468c2bbf344bf9 (patch)
tree	30a6a78d0a5ab4249b1b39ae624e9f70780a6d11 /llex.c
parent	3a508b8bd70405067c07ba82ded57a7a177eaa48 (diff)
download	lua-7b8504840f15739c6ef16c7d44468c2bbf344bf9.tar.gz lua-7b8504840f15739c6ef16c7d44468c2bbf344bf9.tar.bz2 lua-7b8504840f15739c6ef16c7d44468c2bbf344bf9.zip

diff --git a/llex.c b/llex.c index 3bd3bd42..9974197e 100644 --- a/llex.c +++ b/llex.c
@@ -1,5 +1,5 @@
1	/*	1	/*
2	** $Id: llex.c,v 1.124 2003/08/29 16:48:14 roberto Exp roberto $	2	** $Id: llex.c,v 1.125 2003/09/04 20:00:28 roberto Exp roberto $
3	** Lexical Analyzer	3	** Lexical Analyzer
4	** See Copyright Notice in lua.h	4	** See Copyright Notice in lua.h
5	*/	5	*/
@@ -24,7 +24,15 @@
24		24
25	#define next(ls) (ls->current = zgetc(ls->z))	25	#define next(ls) (ls->current = zgetc(ls->z))
26		26
27	#define save(ls,c) luaZ_save(ls->L,ls->buff,c)	27
		28	#define MINLEXBUF 32
		29
		30	#define save(ls,c) { \
		31	Mbuffer *b = ls->buff; \
		32	if (b->n + 1 > b->buffsize) \
		33	luaZ_resizebuffer(ls->L, b, ((b->buffsize*2) + MINLEXBUF)); \
		34	b->buffer[b->n++] = cast(char, c); }
		35
28		36
29		37
30	#define currIsNewline(ls) (ls->current == '\n' \|\| ls->current == '\r')	38	#define currIsNewline(ls) (ls->current == '\n' \|\| ls->current == '\r')