1: /* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
2:
3: /*
4: $Header: b2gen.h,v 1.4 85/08/22 16:42:31 timo Exp $
5: */
6:
7: #define Is_node(t) ((t) != NilTree && Is_parsetree(t))
8:
9: extern int nextvarnumber; /* Counts local targets (including formals) */
10: extern value formals, locals, globals, mysteries, refinements;
11: extern string gentab[];
12:
13: #define NTYPES (FORMAL+1)
14:
15: struct state {
16: parsetree h_last;
17: parsetree *h_wanthere;
18: parsetree h_bpchain;
19: };
20:
21: #define f_expr(p) fix(p, 'v') /* "evaluate" */
22: #define f_targ(p) fix(p, 'l') /* "locate" */
23:
24: value copydef();
25: bool modify_tag();
Defined struct's
state
defined in line
15; used 10 times
Defined macros
Usage of this include