diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1996-03-22 16:12:15 -0300 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1996-03-22 16:12:15 -0300 |
commit | ce23901f0445ad62f20a445a0f6f53d928d81666 (patch) | |
tree | 8c56d7c15beab8e0aac9cdcb497b1327016cdbc7 | |
parent | df1ee1fb1c5e0235c3182e2094dacb98de00937f (diff) | |
download | lua-github-ce23901f0445ad62f20a445a0f6f53d928d81666.tar.gz |
-rw-r--r-- | opcode.c | 8 |
1 files changed, 6 insertions, 2 deletions
@@ -3,7 +3,7 @@ ** TecCGraf - PUC-Rio */ -char *rcs_opcode="$Id: opcode.c,v 3.64 1996/03/21 16:31:32 roberto Exp roberto $"; +char *rcs_opcode="$Id: opcode.c,v 3.65 1996/03/21 18:55:02 roberto Exp roberto $"; #include <setjmp.h> #include <stdio.h> @@ -25,6 +25,10 @@ char *rcs_opcode="$Id: opcode.c,v 3.64 1996/03/21 16:31:32 roberto Exp roberto $ #define STACK_SIZE 128 +#ifndef STACK_LIMIT +#define STACK_LIMIT 6000 +#endif + typedef int StkId; /* index to stack elements */ static Object initial_stack; @@ -93,7 +97,7 @@ static void growstack (void) lua_initstack(); else { - static int limit = 10000; + static int limit = STACK_LIMIT; StkId t = top-stack; Long stacksize = stackLimit - stack; stacksize = growvector(&stack, stacksize, Object, stackEM, limit+100); |