Future/bison
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/bison.git synced 2026-03-09 20:33:03 +00:00
Code Issues Packages Projects Releases Wiki Activity

* src/state.h, src/state.c (shifts_to): New.

Browse Source 
* src/lalr.c (build_relations): Use it.
This commit is contained in:
Akim Demaille
2002-06-30 17:31:37 +00:00
parent 9222837b27
commit 24c7d80020
4 changed files with 26 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
ChangeLog
View File

@@ -1,3 +1,9 @@
2002-06-30 Akim Demaille <akim@epita.fr>
* src/state.h, src/state.c (shifts_to): New.
* src/lalr.c (build_relations): Use it.
2002-06-30 Akim Demaille <akim@epita.fr>
* src/gram.h (rule_number_t, RULE_NUMBER_MAX, int_of_rule_number)

12
src/lalr.c
View File

@@ -420,16 +420,8 @@ build_relations (void)
for (rp = rules[*rulep].rhs; *rp >= 0; rp++)
{
shifts_t *sp = state->shifts;
int j;
for (j = 0; j < sp->nshifts; j++)
{
state = states[sp->shifts[j]];
if (state->accessing_symbol
== item_number_as_symbol_number (*rp))
break;
}
state = shifts_to (state->shifts,
item_number_as_symbol_number (*rp));
states1[length++] = state->number;
}

14
src/state.c
View File

@@ -49,6 +49,20 @@ shifts_new (int nshifts, state_number_t *shifts)
}
/*-----------------------------------------------------------------.
| Return the state such these SHIFTS contain a shift/goto to it on |
| SYMBOL. Aborts if none found. |
`-----------------------------------------------------------------*/
state_t *
shifts_to (shifts_t *shifts, symbol_number_t s)
{
int j;
for (j = 0; j < shifts->nshifts; j++)
if (SHIFT_SYMBOL (shifts, j) == s)
return states[shifts->shifts[j]];
abort ();
}
/*--------------------.

4
src/state.h
View File

@@ -139,6 +139,10 @@ typedef struct shifts_s
#define SHIFT_IS_DISABLED(Shifts, Shift) \
(Shifts->shifts[Shift] == 0)
/* Return the state such these SHIFTS contain a shift/goto to it on
SYMBOL. Aborts if none found. */
struct state_s;
struct state_s *shifts_to PARAMS ((shifts_t *shifts, symbol_number_t s));
/*-------.
| Errs. |