X-Git-Url: https://git.saurik.com/bison.git/blobdiff_plain/11b192127cac086338bfaa43f3bab3acda8e3a20..026816664ff8283a55f91915843a8ff0ac5cf86c:/src/print_graph.c?ds=sidebyside diff --git a/src/print_graph.c b/src/print_graph.c index 4847c4cc..7e429dbd 100644 --- a/src/print_graph.c +++ b/src/print_graph.c @@ -1,6 +1,6 @@ /* Output a graph of the generated parser, for Bison. - Copyright (C) 2001-2007, 2009-2012 Free Software Foundation, Inc. + Copyright (C) 2001-2007, 2009-2013 Free Software Foundation, Inc. This file is part of Bison, the GNU Compiler Compiler. @@ -39,14 +39,18 @@ | Construct the node labels. | `----------------------------*/ +/* Print the lhs of a rule in such a manner that there is no vertical + repetition, like in *.output files. */ + static void print_core (struct obstack *oout, state *s) { + item_number const *sitems = s->items; + symbol *previous_lhs = NULL; size_t i; - item_number *sitems = s->items; size_t snritems = s->nitems; - /* Output all the items of a state, not only its kernel. */ + /* Output all the items of a state, not just its kernel. */ if (report_flag & report_itemsets) { closure (sitems, snritems); @@ -54,29 +58,34 @@ print_core (struct obstack *oout, state *s) snritems = nitemset; } - obstack_printf (oout, "%d", s->number); + obstack_printf (oout, _("State %d"), s->number); + obstack_sgrow (oout, "\\n\\l"); for (i = 0; i < snritems; i++) { - item_number *sp; - item_number *sp1; - rule_number r; - - sp1 = sp = ritem + sitems[i]; + item_number const *sp1 = ritem + sitems[i]; + item_number const *sp = sp1; + rule *r; - while (*sp >= 0) + while (0 <= *sp) sp++; - r = item_number_as_rule_number (*sp); + r = &rules[item_number_as_rule_number (*sp)]; - obstack_printf (oout, "\n%s -> ", rules[r].lhs->tag); + obstack_printf (oout, "%3d ", r->number); + if (previous_lhs && UNIQSTR_EQ (previous_lhs->tag, r->lhs->tag)) + obstack_printf (oout, "%*s| ", + (int) strlen (previous_lhs->tag), ""); + else + obstack_printf (oout, "%s: ", escape (r->lhs->tag)); + previous_lhs = r->lhs; - for (sp = rules[r].rhs; sp < sp1; sp++) - obstack_printf (oout, "%s ", symbols[*sp]->tag); + for (sp = r->rhs; sp < sp1; sp++) + obstack_printf (oout, "%s ", escape (symbols[*sp]->tag)); obstack_1grow (oout, '.'); for (/* Nothing */; *sp >= 0; ++sp) - obstack_printf (oout, " %s", symbols[*sp]->tag); + obstack_printf (oout, " %s", escape (symbols[*sp]->tag)); /* Experimental feature: display the lookahead tokens. */ if (report_flag & report_lookahead_tokens @@ -84,7 +93,7 @@ print_core (struct obstack *oout, state *s) { /* Find the reduction we are handling. */ reductions *reds = s->reductions; - int redno = state_reduction_find (s, &rules[r]); + int redno = state_reduction_find (s, r); /* Print them if there are. */ if (reds->lookahead_tokens && redno != -1) @@ -92,15 +101,17 @@ print_core (struct obstack *oout, state *s) bitset_iterator biter; int k; char const *sep = ""; - obstack_sgrow (oout, "["); + obstack_sgrow (oout, " ["); BITSET_FOR_EACH (biter, reds->lookahead_tokens[redno], k, 0) { - obstack_printf (oout, "%s%s", sep, symbols[k]->tag); + obstack_sgrow (oout, sep); + obstack_sgrow (oout, escape (symbols[k]->tag)); sep = ", "; } - obstack_sgrow (oout, "]"); + obstack_1grow (oout, ']'); } } + obstack_sgrow (oout, "\\l"); } } @@ -113,9 +124,8 @@ print_core (struct obstack *oout, state *s) static void print_actions (state const *s, FILE *fgraph) { - int i; - transitions const *trans = s->transitions; + int i; if (!trans->num && !s->reductions) return; @@ -139,6 +149,8 @@ print_actions (state const *s, FILE *fgraph) TRANSITION_IS_ERROR (trans, i) ? NULL : symbols[sym]->tag, style, fgraph); } + /* Display reductions. */ + output_red (s, s->reductions, fgraph); }