]> git.donarmstrong.com Git - lilypond.git/blob - lily/input-score.cc
release: 0.0.42.pre3
[lilypond.git] / lily / input-score.cc
1 /*
2   input-score.cc -- implement Input_score
3
4   source file of the LilyPond music typesetter
5
6   (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
7 */
8
9 #include "debug.hh"
10 #include "input-score.hh"
11 #include "input-staff.hh"
12 #include "input-music.hh"
13 #include "score.hh"
14 #include "paper-def.hh"
15 #include "midi-def.hh"
16 #include "staff.hh"
17
18
19 void
20 Input_score::add(Input_staff*s)
21 {
22     staffs_.bottom().add(s);
23 }
24
25 void
26 Input_score::set(Paper_def*p)
27 {
28     delete paper_p_;
29     paper_p_ = p;
30 }
31
32 void
33 Input_score::set(Midi_def* midi_p)
34 {
35     delete midi_p_;
36     midi_p_ = midi_p;
37 }
38  
39 Input_score::Input_score(Input_score const&s)
40 {
41     paper_p_ = (s.paper_p_)? new Paper_def(*s.paper_p_) :0;
42     midi_p_ = (s.midi_p_)? new Midi_def(*s.midi_p_) : 0;
43     defined_ch_c_l_ = s.defined_ch_c_l_;
44     errorlevel_i_ = s.errorlevel_i_;
45 }
46
47 Score*
48 Input_score::parse()
49 {
50     Score *s_p = new Score;
51     s_p->defined_ch_c_l_= defined_ch_c_l_;
52     s_p->errorlevel_i_ = errorlevel_i_;
53     if (midi_p_)
54         s_p->set(new Midi_def(*midi_p_));
55     if (paper_p_)
56         s_p->set(new Paper_def(*paper_p_));
57
58     for (iter_top(staffs_,i); i.ok(); i++) {
59         Staff* staf_p=i->parse(s_p);
60         s_p->add(staf_p);
61     }
62
63     return s_p;
64 }
65
66
67 Input_score::~Input_score()
68 {
69     delete paper_p_;
70     delete midi_p_;
71 }
72
73 Input_score::Input_score()
74 {
75     defined_ch_c_l_=0;
76     paper_p_= 0;
77     midi_p_ = 0;
78     errorlevel_i_ = 0;
79 }
80
81 void
82 Input_score::print()const
83 {
84 #ifndef NPRINT
85     mtor << "Input_score {\n";
86     for (iter_top(staffs_,i); i.ok(); i++) {
87         i->print();
88     }
89     mtor << "}\n";
90 #endif
91 }