]> git.donarmstrong.com Git - lilypond.git/blob - stcol.cc
release: 0.0.4
[lilypond.git] / stcol.cc
1 #include "stcol.hh"
2 #include "sccol.hh"
3 #include "voice.hh"
4
5 bool
6 Staff_column::mus() const
7 {
8     return score_column->musical;
9 }
10
11 Mtime
12 Staff_column::when() const
13 {
14     return score_column->when;
15 }
16
17 void
18 Staff_column::add(Voice_element*ve)
19 {
20     Mtime d= ve->duration;
21     if (d){
22         score_column->durations.add(d);
23     }
24         
25     v_elts.add(ve);
26 }
27
28 Staff_column::Staff_column(Score_column*s) {
29     score_column = s;
30 }