/* jit/parseRT.h - RTA parser header
- Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003
- R. Grafl, A. Krall, C. Kruegel, C. Oates, R. Obermaisser,
- M. Probst, S. Ring, E. Steiner, C. Thalinger, D. Thuernbeck,
- P. Tomsich, J. Wenninger
+ Copyright (C) 1996-2005 R. Grafl, A. Krall, C. Kruegel, C. Oates,
+ R. Obermaisser, M. Platter, M. Probst, S. Ring, E. Steiner,
+ C. Thalinger, D. Thuernbeck, P. Tomsich, C. Ullrich, J. Wenninger,
+ Institut f. Computersprachen - TU Wien
This file is part of CACAO.
Authors: Carolyn Oates
- $Id: parseRT.h 557 2003-11-02 22:51:59Z twisti $
+ $Id: parseRT.h 1735 2004-12-07 14:33:27Z twisti $
*/
-
#ifndef _PARSERT_H
#define _PARSERT_H
-#include "global.h"
+#include "vm/global.h"
+
+
+extern FILE *rtMissed; /* Methods missed during RTA parse of Main */
+
+typedef struct {
+ listnode linkage;
+ methodinfo *method;
+ } rtaNode ;
+
+
+extern int RT_jit_parse(methodinfo *m);
+
+#define METHINFOx(mm) \
+ { \
+ printf("<c%i/m%i/p%i>\t", \
+ mm->class->classUsed,mm->methodUsed, mm->monoPoly); \
+ method_display_w_class(mm); }
+
+#define METHINFO(mm,flg) \
+if (flg) { \
+ printf("<c%i/m%i/p%i>\t", \
+ mm->class->classUsed,mm->methodUsed, mm->monoPoly); \
+ method_display_w_class(mm); }
+
+#define METHINFOtx(mm,TXT) \
+ { \
+ printf(TXT); \
+ METHINFOx(mm) \
+ }
+
+#define METHINFOt(mm,TXT,flg) \
+if (flg) { \
+ printf(TXT); \
+ METHINFO(mm,flg) \
+ }
+
+#define CLASSNAME1(cls,TXT,flg) \
+if (flg) {printf(TXT); \
+ printf("<c%i>\t",cls->classUsed); \
+ utf_display(cls->name); fflush(stdout);}
+
+#define CLASSNAMEop(cls,flg) \
+if (flg) {printf("\t%s: ",opcode_names[opcode]);\
+ printf("<c%i>\t",cls->classUsed); \
+ utf_display(cls->name); printf("\n");fflush(stdout);}
+
+#define CLASSNAME(cls,TXT,flg) \
+if (flg) { printf(TXT); \
+ printf("<c%i>\t",cls->classUsed); \
+ utf_display(cls->name); printf("\n");fflush(stdout);}
+
+#define SHOWOPCODE \
+if (DEBUGopcodes== true) {printf("Parse p=%i<%i< opcode=<%i> %s\n", \
+ p, m->jcodelength,opcode,opcode_names[opcode]);}
-extern bool XTAOPTbypass;
-extern bool XTAOPTbypass2;
-extern bool XTAOPTbypass3;
-extern int XTAdebug;
-extern int XTAfld;
-extern int methRT;
-extern int methRTlast;
-extern int methRTmax;
-extern methodinfo **callgraph;
-
-extern int methXTA;
-extern int methXTAlast;
-extern int methXTAmax;
-extern methodinfo **XTAcallgraph;
#endif /* _PARSERT_H */
* tab-width: 4
* End:
*/
+