Update

[bison.git] / src / output.c

diff --git a/src/output.c b/src/output.c
index b58f0ec043c19d0d6b7b387814880446ecd7e332..eecb8c68cf44dc5f02309d62c21b96bb236dcc3c 100644 (file)
--- a/src/output.c
+++ b/src/output.c
@@ -129,8 +129,8 @@ struct obstack output_obstack;
 /* FIXME. */
 
 static inline void
 /* FIXME. */
 
 static inline void

-output_table_data (struct obstack* oout, 
-                  short* table, 
+output_table_data (struct obstack *oout, 
+                  short *table_data, 

                   short first, 
                   short begin, 
                   short end)
                   short first, 
                   short begin, 
                   short end)


@@ -149,7 +149,7 @@ output_table_data (struct obstack* oout,
        }
       else
        ++j;
        }
       else
        ++j;

-      obstack_fgrow1 (oout, "%6d", table[i]);
+      obstack_fgrow1 (oout, "%6d", table_data[i]);

     }
   obstack_1grow (oout, 0);
 }
     }
   obstack_1grow (oout, 0);
 }


@@ -969,7 +969,7 @@ output_parser (void)
     }
   fskel = xfopen (skeleton, "r");
 
     }
   fskel = xfopen (skeleton, "r");
 

-  /* New output code. */
+  /* New output code.  */

   line = 1;
   c = getc (fskel);
   while (c != EOF)
   line = 1;
   c = getc (fskel);
   while (c != EOF)


@@ -983,14 +983,14 @@ output_parser (void)
        }
       else if ((c = getc (fskel)) == '%')
        {
        }
       else if ((c = getc (fskel)) == '%')
        {

-         /* Read the macro. */
-         char* macro_key = 0;
-         char* macro_value = 0;
+         /* Read the macro.  */
+         const char *macro_key = 0;
+         const char *macro_value = 0;

          while (isalnum (c = getc (fskel)) || c == '_')
            obstack_1grow (&macro_obstack, c);
          obstack_1grow (&macro_obstack, 0);
 
          while (isalnum (c = getc (fskel)) || c == '_')
            obstack_1grow (&macro_obstack, c);
          obstack_1grow (&macro_obstack, 0);
 

-         /* Output the right value, or see if it's something special. */
+         /* Output the right value, or see if it's something special.  */

          macro_key = obstack_finish (&macro_obstack);
          macro_value = macro_find (macro_key);
          if (macro_value)
          macro_key = obstack_finish (&macro_obstack);
          macro_value = macro_find (macro_key);
          if (macro_value)


@@ -1013,20 +1013,10 @@ output_parser (void)
        obstack_1grow (&table_obstack, '%');
     }
 
        obstack_1grow (&table_obstack, '%');
     }
 

-  /* End. */
+  /* End.  */

   xfclose (fskel);
 }
 
   xfclose (fskel);
 }
 

-static void
-output_program (void)
-{
-  int c;
-
-  while ((c = getc (finput)) != EOF)
-    obstack_1grow (&table_obstack, c);
-}
-
-

 static void
 free_itemsets (void)
 {
 static void
 free_itemsets (void)
 {


@@ -1077,23 +1067,15 @@ prepare (void)
   MACRO_INSERT_INT ("ntbase", ntokens);
   MACRO_INSERT_INT ("verbose", 0);
 
   MACRO_INSERT_INT ("ntbase", ntokens);
   MACRO_INSERT_INT ("verbose", 0);
 

-  MACRO_INSERT_STRING ("filename", infile);
-

   MACRO_INSERT_INT ("nnts", nvars);
   MACRO_INSERT_INT ("nrules", nrules);
   MACRO_INSERT_INT ("nstates", nstates);
   MACRO_INSERT_INT ("ntokens", ntokens);
 
   MACRO_INSERT_INT ("nnts", nvars);
   MACRO_INSERT_INT ("nrules", nrules);
   MACRO_INSERT_INT ("nstates", nstates);
   MACRO_INSERT_INT ("ntokens", ntokens);
 

+  MACRO_INSERT_INT ("locations_flag", locations_flag);
+

   if (spec_name_prefix)
   if (spec_name_prefix)

-    {
-      MACRO_INSERT_PREFIX ("yylex", "lex");
-      MACRO_INSERT_PREFIX ("yychar", "char");
-      MACRO_INSERT_PREFIX ("yylval", "lval");
-      MACRO_INSERT_PREFIX ("yydebug", "debug");
-      MACRO_INSERT_PREFIX ("yyerror", "error");
-      MACRO_INSERT_PREFIX ("yynerrs", "nerrs");
-      MACRO_INSERT_PREFIX ("yyparse", "parse");
-    }
+    MACRO_INSERT_STRING ("prefix", spec_name_prefix);

 }
 
 /*----------------------------------------------------------.
 }
 
 /*----------------------------------------------------------.


@@ -1105,7 +1087,9 @@ output (void)
 {
   obstack_init (&output_obstack);
 
 {
   obstack_init (&output_obstack);
 

-  /* reader_output_yylsp (&table_obstack); */
+#if 0
+  reader_output_yylsp (&table_obstack); */
+#endif

   free_itemsets ();
 
   output_token_translations ();
   free_itemsets ();
 
   output_token_translations ();


@@ -1116,13 +1100,14 @@ output (void)
     output_stos ();
   output_rule_data ();
   output_actions ();
     output_stos ();
   output_rule_data ();
   output_actions ();

-
-  /* if (!no_parser_flag) */
+  
+#if 0
+  if (!no_parser_flag) */
+#endif

   prepare ();
   /* Copy definitions in directive.  */
   prepare ();
   /* Copy definitions in directive.  */

-  macro_insert ("definitions", obstack_finish (&attrs_obstack));
+  macro_insert ("prologue", obstack_finish (&attrs_obstack));

   output_parser ();
   output_parser ();

-  output_program ();

 
   obstack_free (&macro_obstack, 0);
   obstack_free (&output_obstack, 0);
 
   obstack_free (&macro_obstack, 0);
   obstack_free (&output_obstack, 0);