mirror of
https://git.savannah.gnu.org/git/bison.git
synced 2026-03-13 22:33:03 +00:00
* src/symtab.c, src/symtab.c (symbol_type_set)
(symbol_precedence_set): New. * src/reader.c (parse_type_decl, parse_assoc_decl): Use them. (value_components_used): Remove, unused.
This commit is contained in:
28
src/symtab.c
28
src/symtab.c
@@ -59,6 +59,34 @@ symbol_new (const char *tag)
|
||||
}
|
||||
|
||||
|
||||
/*-----------------------------------------.
|
||||
| Set the TYPE_NAME associated to SYMBOL. |
|
||||
`-----------------------------------------*/
|
||||
|
||||
void
|
||||
symbol_type_set (symbol_t *symbol, char *type_name)
|
||||
{
|
||||
if (symbol->type_name)
|
||||
complain (_("type redeclaration for %s"), symbol->tag);
|
||||
symbol->type_name = type_name;
|
||||
}
|
||||
|
||||
|
||||
/*------------------------------------------.
|
||||
| Set the PRECEDENCE associated to SYMBOL. |
|
||||
`------------------------------------------*/
|
||||
|
||||
void
|
||||
symbol_precedence_set (symbol_t *symbol,
|
||||
int prec, associativity assoc)
|
||||
{
|
||||
if (symbol->prec != 0)
|
||||
complain (_("redefining precedence of %s"), symbol->tag);
|
||||
symbol->prec = prec;
|
||||
symbol->assoc = assoc;
|
||||
}
|
||||
|
||||
|
||||
/*------------.
|
||||
| Free THIS. |
|
||||
`------------*/
|
||||
|
||||
Reference in New Issue
Block a user