]> git.donarmstrong.com Git - lilypond.git/blob - lily/staff-info.cc
250d3273d68a3706c2390d11887234cc99a2c1b7
[lilypond.git] / lily / staff-info.cc
1 /*
2   staff-info.cc -- implement Staff_info
3
4   source file of the GNU LilyPond music typesetter
5
6   (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
7 */
8
9 #include "proto.hh"
10 #include "plist.hh"
11 #include "staff-info.hh"
12 #include "score-column.hh"
13
14 Score*
15 Staff_info::score_l()
16 {
17     return score_l_;
18 }
19 Staff_info::Staff_info()
20 {
21     score_l_ =0;
22     c0_position_i_l_ = 0;
23     time_C_ = 0;
24     rhythmic_C_ =0;
25     break_allowed_b_ = 0;
26 }
27
28 Score_column*
29 Staff_info::musical_l()
30 {
31     return musical_l_;
32 }
33
34 Score_column*
35 Staff_info::command_l()
36 {
37     return command_l_;
38 }
39 PCol*
40 Staff_info::command_pcol_l()
41 {
42     return command_l()->pcol_l_;
43 }
44 PCol*
45 Staff_info::musical_pcol_l()
46 {
47     return musical_l()->pcol_l_;
48 }
49
50 Moment
51 Staff_info::when()
52 {
53     return command_l()->when();
54 }
55