]> git.donarmstrong.com Git - lilypond.git/blob - lily/staff-sym-engraver.cc
release: 1.1.6
[lilypond.git] / lily / staff-sym-engraver.cc
1 /*
2   staff-sym-reg.cc -- implement Staff_symbol_engraver
3
4   source file of the GNU LilyPond music typesetter
5
6   (c)  1997--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7 */
8
9 #include "staff-sym-engraver.hh"
10 #include "staff-sym.hh"
11 #include "score.hh"
12 #include "p-col.hh"
13
14
15 void
16 Staff_symbol_engraver::fill_staff_info (Staff_info&i)
17 {
18   i.staff_sym_l_ = span_p_;
19 }
20
21 Staff_symbol_engraver::~Staff_symbol_engraver()
22 {
23   assert (!span_p_);
24 }
25
26 Staff_symbol_engraver::Staff_symbol_engraver()
27 {
28    span_p_ = 0;
29 }
30
31 void
32 Staff_symbol_engraver::do_creation_processing()
33 {
34   span_p_ = new Staff_symbol;
35   span_p_->set_bounds(LEFT,get_staff_info().command_pcol_l ());
36   announce_element (Score_element_info (span_p_, 0));
37 }
38
39 void
40 Staff_symbol_engraver::do_removal_processing()
41 {
42   Scalar l (get_property ("nolines"));
43   if (l.isnum_b ())
44     {
45       span_p_->no_lines_i_ = l;
46     }
47
48   span_p_->set_bounds(RIGHT,get_staff_info().command_pcol_l ());
49   typeset_element (span_p_);
50   span_p_ =0;
51 }
52
53
54
55
56 ADD_THIS_TRANSLATOR(Staff_symbol_engraver);