/[bison]/bison/src/symtab.c
ViewVC logotype

Diff of /bison/src/symtab.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.36 by akim, Tue Jun 18 09:55:35 2002 UTC revision 1.37 by akim, Thu Jun 20 09:08:37 2002 UTC
# Line 118  symbol_type_set (symbol_t *symbol, locat Line 118  symbol_type_set (symbol_t *symbol, locat
118    
119    
120  /*-------------------------------------------------------------------.  /*-------------------------------------------------------------------.
121  | Set the DESTRUCTOR associated to SYMBOL.  Does nothing if passed 0 |  | Set the DESTRUCTOR associated to SYMBOL.  Do nothing if passed 0.  |
 | as DESTRUCTOR.                                                      |  
122  `-------------------------------------------------------------------*/  `-------------------------------------------------------------------*/
123    
124  void  void
# Line 129  symbol_destructor_set (symbol_t *symbol, Line 128  symbol_destructor_set (symbol_t *symbol,
128      {      {
129        if (symbol->destructor)        if (symbol->destructor)
130          complain_at (location,          complain_at (location,
131                       _("destructor redeclaration for %s"),                       _("%s redeclaration for %s"),
132                       symbol_tag_get (symbol));                       "%destructor", symbol_tag_get (symbol));
133        symbol->destructor = destructor;        symbol->destructor = destructor;
134        symbol->destructor_location = location;        symbol->destructor_location = location;
135      }      }
136  }  }
137    
138    
139    /*----------------------------------------------------------------.
140    | Set the PRITNER associated to SYMBOL.  Do nothing if passed 0.  |
141    `----------------------------------------------------------------*/
142    
143    void
144    symbol_printer_set (symbol_t *symbol, char *printer, location_t location)
145    {
146      if (printer)
147        {
148          if (symbol->printer)
149            complain_at (location,
150                         _("%s redeclaration for %s"),
151                         "%printer", symbol_tag_get (symbol));
152          symbol->printer = printer;
153          symbol->printer_location = location;
154        }
155    }
156    
157    
158  /*------------------------------------------------------------------.  /*------------------------------------------------------------------.
159  | Set the PRECEDENCE associated to SYMBOL.  Does nothing if invoked |  | Set the PRECEDENCE associated to SYMBOL.  Does nothing if invoked |

Legend:
Removed from v.1.36  
changed lines
  Added in v.1.37

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26