- progress_indication ("\n");
-
- if (global_input_file->global_header_)
- {
- outputter_->output_scope (global_input_file->global_header_, "lilypond");
- outputter_->write_header_fields_to_file (global_input_file->global_header_);
- }
-
- if (header_)
- {
- outputter_->output_scope (header_, "lilypond");
- outputter_->write_header_fields_to_file (header_);
- }
-
- outputter_->output_comment (_ ("Outputting Score, defined at: "));
- outputter_->output_comment (origin_string_);
-
- if (paper_->variable_tab_)
- outputter_->output_scope (paper_->variable_tab_, "lilypondpaper");
-
- SCM scm = scm_list_n (ly_symbol2scm ("header-end"), SCM_UNDEFINED);
- outputter_->output_scheme (scm);
-
- system_->output_lines ();