better control when growing arrays.

1 files changed, 2 insertions, 5 deletions

diff --git a/func.c b/func.c
index e4fc9f53..d9ed9831 100644
--- a/func.c
+++ b/func.c
@@ -6,7 +6,6 @@
 #include "func.h"
 #include "opcode.h"
 
-#define LOCALVARINITSIZE 10
 
 static TFunc *function_root = NULL;
 static LocVar *currvars = NULL;
@@ -103,10 +102,8 @@ void lua_funcinfo (lua_Object func, char **filename, int *linedefined)
 void luaI_registerlocalvar (TaggedString *varname, int line)
 {
   if (numcurrvars >= maxcurrvars)
-  {
-    maxcurrvars = (maxcurrvars == 0) ? LOCALVARINITSIZE : maxcurrvars*2;
-    currvars = growvector(currvars, maxcurrvars, LocVar);
-  }
+    maxcurrvars = growvector(&currvars, maxcurrvars, LocVar,
+                    lockEM, MAX_WORD);
   currvars[numcurrvars].varname = varname;
   currvars[numcurrvars].line = line;
   numcurrvars++;