Go to the source code of this file.
Defines | |
| #define | MAXLABELSZ 512 |
| #define | MISSING -2 |
| #define | genl(op, l) genl_RIC(Goutfile,op,l) |
| #define | gen0(op) gen_RIC(Goutfile,op,SK,SK,SK) |
| #define | gen1(op, a1) gen_RIC(Goutfile,op,a1,SK,SK) |
| #define | gen2(op, a1, a2) gen_RIC(Goutfile,op,a1,a2,SK) |
| #define | gen3(op, a1, a2, a3) gen_RIC(Goutfile,op,a1,a2,a3) |
| #define | ASSERT(a, b) |
| #define | ASSERT2(a, b, c) |
| #define | Gallocate Vallocate |
| #define | Gnewlabel Vnewlabel |
| #define | ALLOC_FO(loc) |
| #define | DISPLAY(dest, level) |
| #define | UNDISPLAY(dest) |
| #define DISPLAY | ( | dest, | |||
| level | ) |
Value:
{\
if (level == 0) { \
dest = GF; \
} else if (level == Glevel) { \
dest = AR; \
} else { \
int i = Glevel - level; /* number of indirections needed */ \
int source = AR; \
\
dest = avail_loc++; \
gen2(DCL, dest, DCL_ADDR); \
while (i != 0) { \
gen3(LDI, source, 0, dest); \
source = dest; \
i--; \
} \
}\
}
| #define gen3 | ( | op, | |||
| a1, | |||||
| a2, | |||||
| a3 | ) | gen_RIC(Goutfile,op,a1,a2,a3) |
| #define UNDISPLAY | ( | dest | ) |
1.5.4