2 line-group-engraver-group.cc -- implement Line_group_engraver
4 source file of the GNU LilyPond music typesetter
6 (c) 1997--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
9 #include "command-request.hh"
12 #include "line-group-group-engraver.hh"
13 #include "paper-column.hh"
14 #include "axis-group-interface.hh"
18 Line_group_engraver_group::Line_group_engraver_group()
25 Line_group_engraver_group::typeset_element (Score_element *elem)
27 if (!elem->parent_l (Y_AXIS))
28 Axis_group_interface::add_element (staffline_p_, elem);
29 Engraver_group_engraver::typeset_element (elem);
34 Line_group_engraver_group::do_removal_processing()
36 Engraver_group_engraver::do_removal_processing ();
38 = unsmob_element (get_property (ly_symbol2scm ("currentCommandColumn")));
40 staffline_p_->set_bound(RIGHT,it);
41 Engraver_group_engraver::typeset_element (staffline_p_);
46 Line_group_engraver_group::do_creation_processing()
48 create_line_spanner ();
50 = unsmob_element (get_property (ly_symbol2scm ("currentCommandColumn")));
51 staffline_p_->set_bound(LEFT,it);
53 Engraver::announce_element (staffline_p_,0);
57 Line_group_engraver_group::create_line_spanner ()
59 staffline_p_ = new Spanner (SCM_EOL);
60 Axis_group_interface::set_interface (staffline_p_);
61 Axis_group_interface::set_axes (staffline_p_, Y_AXIS,Y_AXIS);
67 ADD_THIS_TRANSLATOR(Line_group_engraver_group);