Joseph Wenninger
Christian Thalinger
- $Id: parse.c 5410 2006-09-07 14:38:51Z edwin $
+ $Id: parse.c 5418 2006-09-08 12:10:39Z edwin $
*/
jd->vartop = nlocals;
jd->var = DMNEW(varinfo, jd->varcount);
MZERO(jd->var, varinfo, jd->varcount);
- m->maxlocals = nlocals;
- cd->maxlocals = nlocals;
/* set types of all Locals in jd->var */
for(mapptr = local_map, i = 0; i < (cd->maxlocals * 5); i++, mapptr++)
Changes: Edwin Steiner
- $Id: parse.h 5404 2006-09-07 13:29:05Z christian $
+ $Id: parse.h 5418 2006-09-08 12:10:39Z edwin $
*/
iptr->dst.insindex = (iindex); \
PINC
-#if defined(NEW_VAR)
# define OP_LOCALINDEX(o,index) \
OP_PREPARE_ZEROFLAGS(o); \
iptr->s1.varindex = (index); \
do { \
local_map[(index) * 5 + (type)] = 1; \
} while (0)
-#else
-# define OP_LOCALINDEX(o,index) \
- OP_PREPARE_ZEROFLAGS(o); \
- iptr->s1.localindex = (index); \
- PINC
-
-# define OP_LOCALINDEX_I(o,index,v) \
- OP_PREPARE_ZEROFLAGS(o); \
- iptr->s1.localindex = (index); \
- iptr->sx.val.i = (v); \
- PINC
-#error 333
-# define LOCALTYPE_USED(index,type)
-#endif /* defined(NEW_VAR) */
#define OP_LOAD_ONEWORD(o,index,type) \
do { \
LOCALTYPE_USED(index,type); \
} while (0)
-#if defined(NEW_VAR)
# define OP_STORE_ONEWORD(o,index,type) \
do { \
INDEX_ONEWORD(index); \
LOCALTYPE_USED(index,type); \
PINC; \
} while (0)
-#else
-# define OP_STORE_ONEWORD(o,index,type) \
- do { \
- INDEX_ONEWORD(index); \
- OP_PREPARE_ZEROFLAGS(o); \
- iptr->dst.localindex = (index); \
- LOCALTYPE_USED(index,type); \
- PINC; \
- } while (0)
-
-# define OP_STORE_TWOWORD(o,index,type) \
- do { \
- INDEX_TWOWORD(index); \
- OP_PREPARE_ZEROFLAGS(o); \
- iptr->dst.localindex = (index); \
- LOCALTYPE_USED(index,type); \
- PINC; \
- } while (0)
-#endif /* defined(NEW_VAR) */
#define OP_BUILTIN_CHECK_EXCEPTION(bte) \
jd->isleafmethod = false; \