-Score::Score()
-{
- pscore_p_=0;
- paper_p_ = 0;
- midi_p_ = 0;
- errorlevel_i_ = 0;
- defined_ch_c_l_ = 0;
-}
-
-Score::~Score()
-{
- delete pscore_p_;
- delete paper_p_;
- delete midi_p_;
-}
-
-void
-Score::paper_output()
-{
- OK();
- if (paper_p_->outfile=="")
- paper_p_->outfile = default_out_fn + ".out";
-
- if ( errorlevel_i_ ) {
- *mlog << "lilypond: warning: no output to: " << paper_p_->outfile
- << " (errorlevel=" << errorlevel_i_ << ")" << endl;
- return;
- }
-
- *mlog << "TeX output to " << paper_p_->outfile << " ...\n";
-
- Tex_stream the_output(paper_p_->outfile);
-
- the_output << "% outputting Score, defined at: " <<
- source_l_g->
- sourcefile_l (defined_ch_c_l_)->file_line_no_str(defined_ch_c_l_) << "\n";
- pscore_p_->output(the_output);
-}
-
-void
-Score::midi()
-{
- if (!midi_p_)
- return;
-
- if (midi_p_->outfile_str_ == "")
- midi_p_->outfile_str_ = default_out_fn + ".midi";
-
- *mlog << "midi output to " << midi_p_->outfile_str_ << " ...\n";
- Midi_output(this, midi_p_);
-}
-