aboutsummaryrefslogtreecommitdiffstats
path: root/symbol.c
diff options
context:
space:
mode:
Diffstat (limited to 'symbol.c')
-rw-r--r--symbol.c16
1 files changed, 8 insertions, 8 deletions
diff --git a/symbol.c b/symbol.c
index 5a34f296..dc87ed90 100644
--- a/symbol.c
+++ b/symbol.c
@@ -91,16 +91,16 @@ lookup(const char *name)
{
NODE *n;
NODE *tmp;
- /* ``It's turtles, all the way down.'' */
- NODE *tables[] = {
- param_table, /* parameters shadow everything */
- global_table, /* SYMTAB and FUNCTAB found first, can't be redefined */
- func_table, /* then functions */
- symbol_table, /* then globals */
- NULL,
- };
+ NODE *tables[5]; /* manual init below, for z/OS */
int i;
+ /* ``It's turtles, all the way down.'' */
+ tables[0] = param_table; /* parameters shadow everything */
+ tables[1] = global_table; /* SYMTAB and FUNCTAB found first, can't be redefined */
+ tables[2] = func_table; /* then functions */
+ tables[3] = symbol_table; /* then globals */
+ tables[4] = NULL;
+
tmp = make_string(name, strlen(name));
n = NULL;