some bug fixes

1987-05-12 18:23:09 +00:00
parent debba57b43
commit 985a52b415
13 changed files with 172 additions and 119 deletions
--- a/util/LLgen/src/reach.c
+++ b/util/LLgen/src/reach.c
@@ -97,13 +97,13 @@ reachwalk(p) register p_gram p; {
 	for (;;) {
 		switch(g_gettype(p)) {
 		  case ALTERNATION :
-			reachwalk(links[g_getcont(p)].l_rule);
+			reachwalk(g_getlink(p)->l_rule);
 			break;
 		  case TERM :
-			reachwalk(terms[g_getcont(p)].t_rule);
+			reachwalk(g_getterm(p)->t_rule);
 			break;
 		  case NONTERM :
-			reachable(&nonterms[g_getnont(p)]);
+			reachable(&nonterms[g_getcont(p)]);
 			break;
 		  case EORULE :
 			return;