]> git.donarmstrong.com Git - lilypond.git/blob - lily/line-group-group-engraver.cc
release: 1.3.37
[lilypond.git] / lily / line-group-group-engraver.cc
1 /*
2   staff-gravs.cc -- implement Line_group_engraver
3
4   source file of the GNU LilyPond music typesetter
5
6   (c)  1997--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7 */
8
9 #include "staff-symbol.hh"
10 #include "command-request.hh"
11 #include "bar.hh"
12 #include "debug.hh"
13 #include "line-group-group-engraver.hh"
14 #include "paper-column.hh"
15 #include "axis-group-interface.hh"
16
17
18 Line_group_engraver_group::Line_group_engraver_group()
19 {
20   staffline_p_ =0;
21 }
22
23
24 void
25 Line_group_engraver_group::typeset_element (Score_element *elem)
26 {
27   if (!elem->parent_l (Y_AXIS))      
28     Axis_group_interface (staffline_p_).add_element (elem);
29   Engraver_group_engraver::typeset_element (elem);
30 }
31
32
33 void
34 Line_group_engraver_group::do_removal_processing()
35 {
36   Engraver_group_engraver::do_removal_processing ();
37
38   staffline_p_->set_bound(RIGHT,get_staff_info().command_pcol_l ());
39   Engraver_group_engraver::typeset_element (staffline_p_);
40   staffline_p_ = 0;
41 }
42
43 void
44 Line_group_engraver_group::do_creation_processing()
45 {
46   create_line_spanner ();
47   staffline_p_->set_bound(LEFT,get_staff_info().command_pcol_l ());
48   
49   Engraver::announce_element (Score_element_info (staffline_p_,0));
50 }
51
52 void
53 Line_group_engraver_group::create_line_spanner ()
54 {
55   staffline_p_ = new Spanner ;
56   Axis_group_interface (staffline_p_).set_interface ();
57   Axis_group_interface (staffline_p_).set_axes (Y_AXIS,Y_AXIS);
58 }
59
60
61
62
63 ADD_THIS_TRANSLATOR(Line_group_engraver_group);
64