2 grid-line-span-engraver.cc -- implement Grid_line_span_engraver
4 source file of the GNU LilyPond music typesetter
6 (c) 2005 Han-Wen Nienhuys <hanwen@xs4all.nl>
10 #include "engraver.hh"
12 #include "grid-line-interface.hh"
14 class Grid_line_span_engraver : public Engraver
17 Link_array<Item> lines_;
20 TRANSLATOR_DECLARATIONS (Grid_line_span_engraver);
22 virtual void acknowledge_grob (Grob_info);
23 virtual void stop_translation_timestep ();
26 Grid_line_span_engraver::Grid_line_span_engraver ()
32 Grid_line_span_engraver::acknowledge_grob (Grob_info i)
34 int depth = i.origin_contexts (this).size ();
35 if (depth && i.grob_->internal_has_interface (ly_symbol2scm ("grid-point-interface")))
37 Item *it = dynamic_cast<Item *> (i.grob_);
40 if (lines_.size () >= 2 && !spanline_)
42 spanline_ = make_item ("GridLine", SCM_EOL);
43 spanline_->set_parent (lines_[0], X_AXIS);
49 Grid_line_span_engraver::stop_translation_timestep ()
53 for (int i = 0; i < lines_.size (); i++)
54 Grid_line_interface::add_grid_point (spanline_, lines_[i]);
61 ADD_TRANSLATOR (Grid_line_span_engraver,
62 /* descr */ "This engraver makes cross-staff linelines: It catches all normal "
63 "line lines, and draws a single span-line across them.",
64 /* creats*/ "GridLine",
66 /* acks */ "grid-point-interface",