#define SYMBOL_ATTR_PRINT(Attr) \
if (s->Attr) \
- fprintf (stderr, " %s { %s }", #Attr, s->Attr)
+ fprintf (f, " %s { %s }", #Attr, s->Attr)
void
-symbol_print (FILE *f, symbol *s)
+symbol_print (symbol *s, FILE *f)
{
- fprintf (stderr, "\"%s\"", s->tag);
+ fprintf (f, "\"%s\"", s->tag);
SYMBOL_ATTR_PRINT (type_name);
SYMBOL_ATTR_PRINT (destructor);
SYMBOL_ATTR_PRINT (printer);
`------------------------------------------------------------------*/
void
-symbol_destructor_set (symbol *sym, char *destructor, location loc)
+symbol_destructor_set (symbol *sym, const char *destructor, location loc)
{
if (destructor)
{
`---------------------------------------------------------------*/
void
-symbol_printer_set (symbol *sym, char *printer, location loc)
+symbol_printer_set (symbol *sym, const char *printer, location loc)
{
if (printer)
{