2 script-column-engraver.cc -- implement Script_column_engraver
4 source file of the GNU LilyPond music typesetter
6 (c) 1999--2002 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 TRANSLATOR_DECLARATIONS(Script_column_engraver);
26 virtual void acknowledge_grob (Grob_info);
27 virtual void create_grobs ();
28 virtual void stop_translation_timestep ();
29 virtual void start_translation_timestep ();
33 Script_column_engraver::Script_column_engraver ()
39 Script_column_engraver::stop_translation_timestep ()
43 typeset_grob (scol_p_);
49 Script_column_engraver::start_translation_timestep ()
51 script_l_arr_.clear ();
56 Script_column_engraver::acknowledge_grob (Grob_info inf)
58 Item *thing = dynamic_cast<Item*> (inf.grob_l_);
59 if (thing && Side_position_interface::has_interface (inf.grob_l_)) // ugh FIXME
61 if (!Item::breakable_b (thing)
62 && Side_position_interface::get_axis (inf.grob_l_) == Y_AXIS)
64 script_l_arr_.push (thing);
70 Script_column_engraver::create_grobs ()
72 if (!scol_p_ && script_l_arr_.size () > 1)
74 scol_p_ = new Item (get_property ("ScriptColumn"));
75 announce_grob(scol_p_, SCM_EOL);
80 for (int i=0; i < script_l_arr_.size (); i++)
81 Script_column::add_staff_sided (scol_p_, script_l_arr_[i]);
82 script_l_arr_.clear ();
87 ENTER_DESCRIPTION(Script_column_engraver,
89 /* creats*/ "ScriptColumn",
90 /* acks */ "side-position-interface",