nik/lush
1
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

bigger limit for number of local variables and upvalues

Browse Source
This commit is contained in:
Roberto Ierusalimschy
1999-06-16 10:22:04 -03:00
parent 5caf7f4a33
commit 5c19ed2a13
1 changed files with 13 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

24
lparser.c
View File

@@ -1,5 +1,5 @@
/* /*
** $Id: lparser.c,v 1.33 1999/05/10 13:54:01 roberto Exp roberto $ ** $Id: lparser.c,v 1.34 1999/05/21 19:54:06 roberto Exp roberto $
** LL(1) Parser and code generator for Lua ** LL(1) Parser and code generator for Lua
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@@ -30,25 +30,27 @@
#define JMPSIZE 2 #define JMPSIZE 2
/* maximum number of local variables */ /* maximum number of local variables */
#define MAXLOCALS 32 #define MAXLOCALS 200
#define SMAXLOCALS "32" #define SMAXLOCALS "200"
/* maximum number of upvalues */ /* maximum number of upvalues */
#define MAXUPVALUES 16 #define MAXUPVALUES 32
#define SMAXUPVALUES "16" #define SMAXUPVALUES "32"
/* /*
** Variable descriptor: ** Variable descriptor:
** must include a "exp" option because LL(1) cannot distinguish ** must include an "exp" option because LL(1) cannot distinguish
** between variables, upvalues and function calls on first sight. ** between variables, upvalues and function calls on first sight.
** VGLOBAL: info is constant index of global name
** VLOCAL: info is stack index
** VDOT: info is constant index of index name
** VEXP: info is pc index of "nparam" of function call (or 0 if exp is closed)
*/ */
typedef enum {VGLOBAL, VLOCAL, VDOT, VINDEXED, VEXP} varkind; typedef enum {
VGLOBAL, /* info is constant index of global name */
VLOCAL, /* info is stack index */
VDOT, /* info is constant index of index name */
VINDEXED, /* no info (table and index are on the stack) */
VEXP /* info is pc index of "nparam" of a call (or 0 if exp is closed) */
} varkind;
typedef struct vardesc { typedef struct vardesc {
varkind k; varkind k;