]> git.donarmstrong.com Git - lilypond.git/blob - lily/staff-sym.cc
release: 0.0.68pre
[lilypond.git] / lily / staff-sym.cc
1 /*
2   staffsym.cc -- implement Staff_symbol
3
4   source file of the GNU LilyPond music typesetter
5
6   (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
7 */
8 #include "staff-sym.hh"
9 #include "lookup.hh"
10 #include "paper-def.hh"
11 #include "molecule.hh"
12 #include "debug.hh"
13
14
15
16 Staff_symbol::Staff_symbol(int l)
17 {
18     no_lines_i_ = l;
19 }
20
21 IMPLEMENT_STATIC_NAME(Staff_symbol);
22 IMPLEMENT_IS_TYPE_B1(Staff_symbol,Spanner);
23
24 void
25 Staff_symbol::do_print()const
26 {
27     mtor << "lines: " << no_lines_i_;
28 }
29
30 Molecule*
31 Staff_symbol::brew_molecule_p() const
32 {
33     Atom a  = paper()->lookup_l()->linestaff(no_lines_i_, width().length());
34     return new Molecule(a);
35 }
36
37 void
38 Staff_symbol::set_extent(PCol*p1, PCol*p2)
39 {
40     assert(p1&&p2);
41     left_col_l_ = p1;
42     right_col_l_ = p2;
43 }
44
45 Real
46 Staff_symbol::inter_note_f()const
47 {
48     return paper()->internote_f();
49 }
50
51 int
52 Staff_symbol::steps_i() const
53 {
54     return no_lines_i_*2;
55 }