2 g-script-column-engraver.cc -- implement Script_column_engraver
4 source file of the GNU LilyPond music typesetter
6 (c) 1999--2001 Han-Wen Nienhuys <hanwen@cs.uu.nl>
10 #include "engraver.hh"
11 #include "script-column.hh"
13 #include "side-position-interface.hh"
16 Find potentially colliding scripts, and put them in a
17 Script_column, that will fix the collisions. */
18 class Script_column_engraver : public Engraver
21 Link_array<Item> script_l_arr_;
24 Script_column_engraver ();
25 VIRTUAL_COPY_CONS(Translator);
27 virtual void acknowledge_grob (Grob_info);
28 virtual void create_grobs ();
29 virtual void stop_translation_timestep ();
30 virtual void start_translation_timestep ();
34 Script_column_engraver::Script_column_engraver()
40 Script_column_engraver::stop_translation_timestep ()
44 typeset_grob (scol_p_);
50 Script_column_engraver::start_translation_timestep ()
52 script_l_arr_.clear ();
57 Script_column_engraver::acknowledge_grob(Grob_info inf)
59 Item *thing = dynamic_cast<Item*> (inf.elem_l_);
60 if (thing && Side_position::has_interface (inf.elem_l_)) // ugh FIXME
62 if (!Item::breakable_b (thing)
63 && Side_position::get_axis (inf.elem_l_) == Y_AXIS)
65 script_l_arr_.push (thing);
71 Script_column_engraver::create_grobs ()
73 if (!scol_p_ && script_l_arr_.size () > 1)
75 scol_p_ = new Item (get_property ("ScriptColumn"));
78 announce_grob (scol_p_, 0);
83 for (int i=0; i < script_l_arr_.size (); i++)
84 Script_column::add_staff_sided (scol_p_, script_l_arr_[i]);
85 script_l_arr_.clear ();
88 ADD_THIS_TRANSLATOR(Script_column_engraver);