253 |
_("Terminals, with rules where they appear")); |
_("Terminals, with rules where they appear")); |
254 |
obstack_sgrow (&output_obstack, "\n\n"); |
obstack_sgrow (&output_obstack, "\n\n"); |
255 |
obstack_fgrow1 (&output_obstack, "%s (-1)\n", tags[0]); |
obstack_fgrow1 (&output_obstack, "%s (-1)\n", tags[0]); |
|
if (translations) |
|
|
{ |
|
|
for (i = 0; i <= max_user_token_number; i++) |
|
|
if (token_translations[i] != 2) |
|
|
{ |
|
|
buffer[0] = 0; |
|
|
column = strlen (tags[token_translations[i]]); |
|
|
obstack_sgrow (&output_obstack, tags[token_translations[i]]); |
|
|
END_TEST (50); |
|
|
sprintf (buffer, " (%d)", i); |
|
256 |
|
|
257 |
for (j = 1; j <= nrules; j++) |
for (i = 0; i <= max_user_token_number; i++) |
258 |
for (rule = &ritem[rrhs[j]]; *rule > 0; rule++) |
if (token_translations[i] != 2) |
259 |
if (*rule == token_translations[i]) |
{ |
260 |
{ |
buffer[0] = 0; |
261 |
END_TEST (65); |
column = strlen (tags[token_translations[i]]); |
262 |
sprintf (buffer + strlen (buffer), " %d", j); |
obstack_sgrow (&output_obstack, tags[token_translations[i]]); |
263 |
break; |
END_TEST (50); |
264 |
} |
sprintf (buffer, " (%d)", i); |
|
obstack_fgrow1 (&output_obstack, "%s\n", buffer); |
|
|
} |
|
|
} |
|
|
else |
|
|
{ |
|
|
for (i = 1; i < ntokens; i++) |
|
|
{ |
|
|
buffer[0] = 0; |
|
|
column = strlen (tags[i]); |
|
|
obstack_sgrow (&output_obstack, tags[i]); |
|
|
END_TEST (50); |
|
|
sprintf (buffer, " (%d)", i); |
|
265 |
|
|
266 |
for (j = 1; j <= nrules; j++) |
for (j = 1; j <= nrules; j++) |
267 |
for (rule = &ritem[rrhs[j]]; *rule > 0; rule++) |
for (rule = &ritem[rrhs[j]]; *rule > 0; rule++) |
268 |
if (*rule == i) |
if (*rule == token_translations[i]) |
269 |
{ |
{ |
270 |
END_TEST (65); |
END_TEST (65); |
271 |
sprintf (buffer + strlen (buffer), " %d", j); |
sprintf (buffer + strlen (buffer), " %d", j); |
272 |
break; |
break; |
273 |
} |
} |
274 |
obstack_fgrow1 (&output_obstack, "%s\n", buffer); |
obstack_fgrow1 (&output_obstack, "%s\n", buffer); |
275 |
} |
} |
|
} |
|
276 |
|
|
277 |
obstack_sgrow (&output_obstack, "\n"); |
obstack_sgrow (&output_obstack, "\n"); |
278 |
obstack_sgrow (&output_obstack, |
obstack_sgrow (&output_obstack, |