Rim Chaabane. Analyse dynamique de ... - Université Paris 8

Analyse dynamique de programmes C
69 val_t Val;
70 }token_t;
71
72 /*****
73 #define getTokenVal(x) ((x).Val)
74 #define setTokenVal(x,y) ((x).Val = (y))
75 #define getTokenType(x) ((x).Type)
76 #define setTokenType(x,y) ((x).Type = (y))
77 #define getTokenCode(x) ((x).Code)
78 #define setTokenCode(x,y) ((x).Code = (y))
79 #define getTokenSym(x) ((x).Sym)
80 #define setTokenSym(x,y) ((x).Sym = (y))
81 #define getTokenTypequal(x) ((x).Typequal)
82 #define setTokenTypequal(x,y) ((x).Typequal = (y))
83 #define getTokenSclass(x) ((x).Sclass)
84 #define setTokenSclass(x,y) ((x).Sclass = (y))
85 #define getTokenPflag(x) ((x).Pflag)
86 #define setTokenPflag(x,y) ((x).Pflag = (y))
87 #define getTokenTab(x) ((x).Tab)
88 #define setTokenTab(x,y) ((x).Tab = (y))
89 #define getTokenTok(x) ((x).Tok)
90 #define setTokenTok(x,y) ((x).Tok = (y))
91 ********/
92
93
94
95 /*CUT symEntry*/
96 typedef struct symentry_t {
97 int tag; /* maker */
98 unsigned int entry; /* entry number */
99 struct symentry_t *next; /* link to next symentry */
100 char *id; /* pointer to identifier string */
101 unsigned char sclass; /* storage class code */
102 unsigned char typequal; /* type qualifier */
103 unsigned char level; /* scope level */
104 unsigned char nspace; /* name space identifier */
105 char ass; /* used to flag assignment */
106 type_expr * type; /* object type */
107 val_t val; /* symbol value information */
108 char *pname; /* previous file name */
109 char *fname; /* file name pointer */
110
111 #if 0
112 int calls; /* number of local references made */
113 int Nref;
114 struct symentry_t **ref; /* references */
115 #endif
116
117 }symentry_t;
118 /*END CUT*/
119
120 typedef struct {
121 stab_t stab;
122
123 code_t CODE;
124 eicstack_t ARgar; /* for garbage collection of AR units*/
125 unsigned int ARsize,sp;
126 AR_t *AR; __ /* static activation record */
127 unsigned int LARsize,lsp;
128 AR_t *LAR;
129 extern_t *link;
130
131 }environ_t;
132
133 #define getenvcode(env) ((env)->CODE)
134
135 typedef struct {
136 int n; /* number of enumerators */
122