ack/lang/pc/comp/scope.xh
2017-08-06 11:15:53 +02:00

33 lines
689 B
Plaintext

/* S C O P E M E C H A N I S M */
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 */