{
fprintf (stderr, "\t\t%3d ", r);
rule_rhs_print (&rules[r], stderr);
+ fprintf (stderr, "\n");
}
}
fprintf (stderr, "\n\n");
{
fprintf (stderr, "\t\t%3d ", (*rp)->user_number);
rule_rhs_print (*rp, stderr);
+ fprintf (stderr, "\n");
}
}
item_number *rp;
for (rp = r->rhs; *rp >= 0; rp++)
fprintf (out, " %s", symbols[*rp]->tag);
- fputc ('\n', out);
}
else
{
- fprintf (out, " /* %s */\n", _("empty"));
+ fprintf (out, " /* %s */", _("empty"));
}
}
}
}
-void
+static void
rule_print (rule *r, FILE *out)
{
fprintf (out, "%s:", r->lhs->tag);
first = false;
rule_lhs_print (&rules[r], previous_lhs, out);
rule_rhs_print (&rules[r], out);
+ fprintf (out, "\n");
previous_lhs = rules[r].lhs;
}
if (!first)
{
fprintf (out, "%-5d ", r);
rule_print (&rules[r], out);
+ fprintf (out, "\n");
}
}
fprintf (out, "\n\n");
{
complain_at (rules[r].location, w, "%s: ", message);
rule_print (&rules[r], stderr);
+ fprintf (stderr, "\n");
fflush (stderr);
}
- }
+ }
}
void
/* Print this rule's RHS on OUT. */
void rule_rhs_print (rule *r, FILE *out);
-/* Print this rule on OUT. */
-void rule_print (rule *r, FILE *out);
-