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")));
41 staffline_p_->set_bound(RIGHT,it);
42 Engraver_group_engraver::typeset_element (staffline_p_);
47 Line_group_engraver_group::do_creation_processing()
49 create_line_spanner ();
51 = unsmob_element (get_property (ly_symbol2scm ("currentCommandColumn")));
52 staffline_p_->set_bound(LEFT,it);
54 Engraver::announce_element (staffline_p_,0);
58 Line_group_engraver_group::create_line_spanner ()
60 staffline_p_ = new Spanner (SCM_EOL);
61 Axis_group_interface::set_interface (staffline_p_);
62 Axis_group_interface::set_axes (staffline_p_, Y_AXIS,Y_AXIS);
68 ADD_THIS_TRANSLATOR(Line_group_engraver_group);