(enum conflict_resolution): Renamed from enum conflict_resolution_e.

This commit is contained in:
Paul Eggert
2002-12-11 06:25:26 +00:00
parent 41f83caf1c
commit f041e30b91

View File

@@ -1,4 +1,5 @@
/* Find and resolve or report look-ahead conflicts for bison, /* Find and resolve or report look-ahead conflicts for bison,
Copyright (C) 1984, 1989, 1992, 2000, 2001, 2002 Copyright (C) 1984, 1989, 1992, 2000, 2001, 2002
Free Software Foundation, Inc. Free Software Foundation, Inc.
@@ -20,17 +21,19 @@
02111-1307, USA. */ 02111-1307, USA. */
#include "system.h" #include "system.h"
#include "bitset.h"
#include "complain.h" #include <bitset.h>
#include "getargs.h"
#include "symtab.h"
#include "files.h"
#include "gram.h"
#include "state.h"
#include "lalr.h"
#include "conflicts.h"
#include "reader.h"
#include "LR0.h" #include "LR0.h"
#include "complain.h"
#include "conflicts.h"
#include "files.h"
#include "getargs.h"
#include "gram.h"
#include "lalr.h"
#include "reader.h"
#include "state.h"
#include "symtab.h"
/* -1 stands for not specified. */ /* -1 stands for not specified. */
int expected_conflicts = -1; int expected_conflicts = -1;
@@ -42,7 +45,7 @@ static bitset lookaheadset;
enum conflict_resolution_e enum conflict_resolution
{ {
shift_resolution, shift_resolution,
reduce_resolution, reduce_resolution,
@@ -58,8 +61,8 @@ enum conflict_resolution_e
`----------------------------------------------------------------*/ `----------------------------------------------------------------*/
static inline void static inline void
log_resolution (rule_t *rule, symbol_number_t token, log_resolution (rule *r, symbol_number token,
enum conflict_resolution_e resolution) enum conflict_resolution resolution)
{ {
if (report_flag & report_solved_conflicts) if (report_flag & report_solved_conflicts)
{ {
@@ -71,7 +74,7 @@ log_resolution (rule_t *rule, symbol_number_t token,
obstack_fgrow2 (&solved_conflicts_obstack, obstack_fgrow2 (&solved_conflicts_obstack,
_("\ _("\
Conflict between rule %d and token %s resolved as shift"), Conflict between rule %d and token %s resolved as shift"),
rule->number, r->number,
symbols[token]->tag); symbols[token]->tag);
break; break;
case reduce_resolution: case reduce_resolution:
@@ -79,14 +82,14 @@ log_resolution (rule_t *rule, symbol_number_t token,
obstack_fgrow2 (&solved_conflicts_obstack, obstack_fgrow2 (&solved_conflicts_obstack,
_("\ _("\
Conflict between rule %d and token %s resolved as reduce"), Conflict between rule %d and token %s resolved as reduce"),
rule->number, r->number,
symbols[token]->tag); symbols[token]->tag);
break; break;
case nonassoc_resolution: case nonassoc_resolution:
obstack_fgrow2 (&solved_conflicts_obstack, obstack_fgrow2 (&solved_conflicts_obstack,
_("\ _("\
Conflict between rule %d and token %s resolved as an error"), Conflict between rule %d and token %s resolved as an error"),
rule->number, r->number,
symbols[token]->tag); symbols[token]->tag);
break; break;
} }
@@ -97,7 +100,7 @@ log_resolution (rule_t *rule, symbol_number_t token,
case shift_resolution: case shift_resolution:
obstack_fgrow2 (&solved_conflicts_obstack, obstack_fgrow2 (&solved_conflicts_obstack,
" (%s < %s)", " (%s < %s)",
rule->prec->tag, r->prec->tag,
symbols[token]->tag); symbols[token]->tag);
break; break;
@@ -105,7 +108,7 @@ log_resolution (rule_t *rule, symbol_number_t token,
obstack_fgrow2 (&solved_conflicts_obstack, obstack_fgrow2 (&solved_conflicts_obstack,
" (%s < %s)", " (%s < %s)",
symbols[token]->tag, symbols[token]->tag,
rule->prec->tag); r->prec->tag);
break; break;
case left_resolution: case left_resolution:
@@ -137,16 +140,16 @@ log_resolution (rule_t *rule, symbol_number_t token,
`------------------------------------------------------------------*/ `------------------------------------------------------------------*/
static void static void
flush_shift (state_t *state, int token) flush_shift (state *s, int token)
{ {
transitions_t *transitions = state->transitions; transitions *trans = s->transitions;
int i; int i;
bitset_reset (lookaheadset, token); bitset_reset (lookaheadset, token);
for (i = 0; i < transitions->num; i++) for (i = 0; i < trans->num; i++)
if (!TRANSITION_IS_DISABLED (transitions, i) if (!TRANSITION_IS_DISABLED (trans, i)
&& TRANSITION_SYMBOL (transitions, i) == token) && TRANSITION_SYMBOL (trans, i) == token)
TRANSITION_DISABLE (transitions, i); TRANSITION_DISABLE (trans, i);
} }
@@ -171,17 +174,16 @@ flush_reduce (bitset lookaheads, int token)
| | | |
| LOOKAHEAD is the number of the lookahead bitset to consider. | | LOOKAHEAD is the number of the lookahead bitset to consider. |
| | | |
| ERRS can be used to store discovered explicit errors. | | ERRORS can be used to store discovered explicit errors. |
`------------------------------------------------------------------*/ `------------------------------------------------------------------*/
static void static void
resolve_sr_conflict (state_t *state, int ruleno, resolve_sr_conflict (state *s, int ruleno, symbol **errors)
symbol_t **errs)
{ {
symbol_number_t i; symbol_number i;
reductions_t *reds = state->reductions; reductions *reds = s->reductions;
/* Find the rule to reduce by to get precedence of reduction. */ /* Find the rule to reduce by to get precedence of reduction. */
rule_t *redrule = reds->rules[ruleno]; rule *redrule = reds->rules[ruleno];
int redprec = redrule->prec->prec; int redprec = redrule->prec->prec;
bitset lookaheads = reds->lookaheads[ruleno]; bitset lookaheads = reds->lookaheads[ruleno];
int nerrs = 0; int nerrs = 0;
@@ -197,7 +199,7 @@ resolve_sr_conflict (state_t *state, int ruleno,
if (symbols[i]->prec < redprec) if (symbols[i]->prec < redprec)
{ {
log_resolution (redrule, i, reduce_resolution); log_resolution (redrule, i, reduce_resolution);
flush_shift (state, i); flush_shift (s, i);
} }
else if (symbols[i]->prec > redprec) else if (symbols[i]->prec > redprec)
{ {
@@ -219,15 +221,15 @@ resolve_sr_conflict (state_t *state, int ruleno,
case left_assoc: case left_assoc:
log_resolution (redrule, i, left_resolution); log_resolution (redrule, i, left_resolution);
flush_shift (state, i); flush_shift (s, i);
break; break;
case non_assoc: case non_assoc:
log_resolution (redrule, i, nonassoc_resolution); log_resolution (redrule, i, nonassoc_resolution);
flush_shift (state, i); flush_shift (s, i);
flush_reduce (lookaheads, i); flush_reduce (lookaheads, i);
/* Record an explicit error for this token. */ /* Record an explicit error for this token. */
errs[nerrs++] = symbols[i]; errors[nerrs++] = symbols[i];
break; break;
case undef_assoc: case undef_assoc:
@@ -237,37 +239,37 @@ resolve_sr_conflict (state_t *state, int ruleno,
/* Some tokens have been explicitly made errors. Allocate a /* Some tokens have been explicitly made errors. Allocate a
permanent errs structure for this state, to record them. */ permanent errs structure for this state, to record them. */
state_errs_set (state, nerrs, errs); state_errs_set (s, nerrs, errors);
if (obstack_object_size (&solved_conflicts_obstack)) if (obstack_object_size (&solved_conflicts_obstack))
{ {
obstack_1grow (&solved_conflicts_obstack, '\0'); obstack_1grow (&solved_conflicts_obstack, '\0');
state->solved_conflicts = obstack_finish (&solved_conflicts_obstack); s->solved_conflicts = obstack_finish (&solved_conflicts_obstack);
} }
} }
/*-------------------------------------------------------------------. /*-------------------------------------------------------------------.
| Solve the S/R conflicts of STATE using the | | Solve the S/R conflicts of state S using the |
| precedence/associativity, and flag it inconsistent if it still has | | precedence/associativity, and flag it inconsistent if it still has |
| conflicts. ERRS can be used as storage to compute the list of | | conflicts. ERRORS can be used as storage to compute the list of |
| lookaheads on which this STATE raises a syntax error (%nonassoc). | | lookaheads on which S raises a syntax error (%nonassoc). |
`-------------------------------------------------------------------*/ `-------------------------------------------------------------------*/
static void static void
set_conflicts (state_t *state, symbol_t **errs) set_conflicts (state *s, symbol **errors)
{ {
int i; int i;
transitions_t *transitions = state->transitions; transitions *trans = s->transitions;
reductions_t *reds = state->reductions; reductions *reds = s->reductions;
if (state->consistent) if (s->consistent)
return; return;
bitset_zero (lookaheadset); bitset_zero (lookaheadset);
FOR_EACH_SHIFT (transitions, i) FOR_EACH_SHIFT (trans, i)
bitset_set (lookaheadset, TRANSITION_SYMBOL (transitions, i)); bitset_set (lookaheadset, TRANSITION_SYMBOL (trans, i));
/* Loop over all rules which require lookahead in this state. First /* Loop over all rules which require lookahead in this state. First
check for shift-reduce conflict, and try to resolve using check for shift-reduce conflict, and try to resolve using
@@ -276,7 +278,7 @@ set_conflicts (state_t *state, symbol_t **errs)
if (reds->rules[i]->prec && reds->rules[i]->prec->prec if (reds->rules[i]->prec && reds->rules[i]->prec->prec
&& !bitset_disjoint_p (reds->lookaheads[i], lookaheadset)) && !bitset_disjoint_p (reds->lookaheads[i], lookaheadset))
{ {
resolve_sr_conflict (state, i, errs); resolve_sr_conflict (s, i, errors);
break; break;
} }
@@ -285,7 +287,7 @@ set_conflicts (state_t *state, symbol_t **errs)
for (i = 0; i < reds->num; ++i) for (i = 0; i < reds->num; ++i)
{ {
if (!bitset_disjoint_p (reds->lookaheads[i], lookaheadset)) if (!bitset_disjoint_p (reds->lookaheads[i], lookaheadset))
conflicts[state->number] = 1; conflicts[s->number] = 1;
bitset_or (lookaheadset, lookaheadset, reds->lookaheads[i]); bitset_or (lookaheadset, lookaheadset, reds->lookaheads[i]);
} }
@@ -300,9 +302,9 @@ set_conflicts (state_t *state, symbol_t **errs)
void void
conflicts_solve (void) conflicts_solve (void)
{ {
state_number_t i; state_number i;
/* List of lookaheads on which we explicitly raise a syntax error. */ /* List of lookaheads on which we explicitly raise a syntax error. */
symbol_t **errs = XMALLOC (symbol_t *, ntokens + 1); symbol **errors = XMALLOC (symbol *, ntokens + 1);
conflicts = XCALLOC (char, nstates); conflicts = XCALLOC (char, nstates);
shiftset = bitset_create (ntokens, BITSET_FIXED); shiftset = bitset_create (ntokens, BITSET_FIXED);
@@ -311,7 +313,7 @@ conflicts_solve (void)
for (i = 0; i < nstates; i++) for (i = 0; i < nstates; i++)
{ {
set_conflicts (states[i], errs); set_conflicts (states[i], errors);
/* For uniformity of the code, make sure all the states have a valid /* For uniformity of the code, make sure all the states have a valid
`errs' member. */ `errs' member. */
@@ -319,7 +321,7 @@ conflicts_solve (void)
states[i]->errs = errs_new (0, 0); states[i]->errs = errs_new (0, 0);
} }
free (errs); free (errors);
} }
@@ -328,21 +330,21 @@ conflicts_solve (void)
`---------------------------------------------*/ `---------------------------------------------*/
static int static int
count_sr_conflicts (state_t *state) count_sr_conflicts (state *s)
{ {
int i; int i;
int src_count = 0; int src_count = 0;
transitions_t *transitions = state->transitions; transitions *trans = s->transitions;
reductions_t *reds = state->reductions; reductions *reds = s->reductions;
if (!transitions) if (!trans)
return 0; return 0;
bitset_zero (lookaheadset); bitset_zero (lookaheadset);
bitset_zero (shiftset); bitset_zero (shiftset);
FOR_EACH_SHIFT (transitions, i) FOR_EACH_SHIFT (trans, i)
bitset_set (shiftset, TRANSITION_SYMBOL (transitions, i)); bitset_set (shiftset, TRANSITION_SYMBOL (trans, i));
for (i = 0; i < reds->num; ++i) for (i = 0; i < reds->num; ++i)
bitset_or (lookaheadset, lookaheadset, reds->lookaheads[i]); bitset_or (lookaheadset, lookaheadset, reds->lookaheads[i]);
@@ -363,10 +365,10 @@ count_sr_conflicts (state_t *state)
+`----------------------------------------------------------------*/ +`----------------------------------------------------------------*/
static int static int
count_rr_conflicts (state_t *state, int one_per_token) count_rr_conflicts (state *s, int one_per_token)
{ {
int i; int i;
reductions_t *reds = state->reductions; reductions *reds = s->reductions;
int rrc_count = 0; int rrc_count = 0;
for (i = 0; i < ntokens; i++) for (i = 0; i < ntokens; i++)
@@ -450,10 +452,10 @@ void
conflicts_output (FILE *out) conflicts_output (FILE *out)
{ {
bool printed_sth = false; bool printed_sth = false;
state_number_t i; state_number i;
for (i = 0; i < nstates; i++) for (i = 0; i < nstates; i++)
{ {
state_t *s = states[i]; state *s = states[i];
if (conflicts[i]) if (conflicts[i])
{ {
fprintf (out, _("State %d contains "), i); fprintf (out, _("State %d contains "), i);
@@ -477,7 +479,7 @@ conflicts_output (FILE *out)
int int
conflicts_total_count (void) conflicts_total_count (void)
{ {
state_number_t i; state_number i;
int count; int count;
/* Conflicts by state. */ /* Conflicts by state. */
@@ -509,7 +511,7 @@ conflicts_print (void)
/* Conflicts by state. */ /* Conflicts by state. */
{ {
state_number_t i; state_number i;
for (i = 0; i < nstates; i++) for (i = 0; i < nstates; i++)
if (conflicts[i]) if (conflicts[i])