-
- /* Free the symbol table data structure. */
- free_symtab ();
-
- lex_free ();
-
- /* Close the input files. */
- close_files ();
-
- free_conflicts ();
- free_nullable ();
- free_derives ();
-
- output_files ();
-
- exit (complain_message_count ? 1 : 0);
-}
-\f
-/* Abort for an internal error denoted by string S. */
-
-void
-berror (const char *s)
-{
- fprintf (stderr, _("%s: internal error: %s\n"), program_name, s);
- abort ();
+ timevar_pop (TV_PARSER);
+
+ timevar_push (TV_FREE);
+ nullable_free ();
+ derives_free ();
+ tables_free ();
+ states_free ();
+ reduce_free ();
+ conflicts_free ();
+ grammar_free ();
+
+ /* The scanner memory cannot be released right after parsing, as it
+ contains things such as user actions, prologue, epilogue etc. */
+ scanner_free ();
+ muscle_free ();
+ uniqstrs_free ();
+ timevar_pop (TV_FREE);
+
+ if (trace_flag & trace_bitsets)
+ bitset_stats_dump (stderr);
+
+ finish:
+
+ /* Stop timing and print the times. */
+ timevar_stop (TV_TOTAL);
+ timevar_print (stderr);
+
+ return complaint_issued ? EXIT_FAILURE : EXIT_SUCCESS;