45 lines
931 B
Text
45 lines
931 B
Text
/* S C O P E M E C H A N I S M */
|
|
#ifndef SCOPE_H_
|
|
#define SCOPE_H_
|
|
|
|
struct scope {
|
|
struct scope *next;
|
|
struct def *sc_def; /* list of definitions in this scope */
|
|
int sc_level; /* level of this scope */
|
|
arith sc_off; /* offsets of variables in this scope */
|
|
struct node *sc_lablist;/* list of labels in this scope, to speed
|
|
up label handling
|
|
*/
|
|
};
|
|
|
|
/* ALLOCDEF "scope" 10 */
|
|
|
|
struct scopelist {
|
|
struct scopelist *next;
|
|
struct scope *sc_scope;
|
|
int sc_count;
|
|
};
|
|
|
|
/* ALLOCDEF "scopelist" 10 */
|
|
|
|
extern struct scope
|
|
*GlobalScope,
|
|
*PervasiveScope,
|
|
*BlockScope;
|
|
|
|
extern struct scopelist
|
|
*CurrVis;
|
|
|
|
#define CurrentScope (CurrVis->sc_scope)
|
|
#define nextvisible(x) ((x)->next) /* use with scopelists */
|
|
|
|
|
|
void InitScope(void);
|
|
void open_scope(void);
|
|
void close_scope(int doclean);
|
|
void Forward(register struct node *nd, register struct type *tp);
|
|
void chk_prog_params(void);
|
|
void chk_directives(void);
|
|
|
|
|
|
#endif
|