2 collision-reg.cc -- implement Collision_engraver
4 source file of the GNU LilyPond music typesetter
6 (c) 1997--2002 Han-Wen Nienhuys <hanwen@cs.uu.nl>
9 #include "note-column.hh"
10 #include "note-collision.hh"
12 #include "engraver.hh"
13 #include "axis-group-interface.hh"
16 collect Note_column, and as soon as there are 2 or more, put them in
17 a collision object. */
18 class Collision_engraver : public Engraver {
20 Link_array<Grob> note_column_l_arr_;
23 virtual void acknowledge_grob (Grob_info);
24 virtual void create_grobs ();
25 virtual void stop_translation_timestep ();
27 TRANSLATOR_DECLARATIONS(Collision_engraver);
32 Collision_engraver::create_grobs ()
34 if (col_p_ || note_column_l_arr_.size () < 2)
38 col_p_ = new Item (get_property ("NoteCollision"));
39 announce_grob (col_p_, SCM_EOL);
42 for (int i=0; i< note_column_l_arr_.size (); i++)
43 Note_collision_interface::add_column (col_p_,note_column_l_arr_[i]);
47 Collision_engraver::acknowledge_grob (Grob_info i)
49 if (Note_column::has_interface (i.grob_l_))
51 /*should check Y axis? */
52 if (Note_column::rest_b (i.grob_l_) || i.grob_l_->get_parent (X_AXIS))
55 note_column_l_arr_.push (i.grob_l_);
60 Collision_engraver::stop_translation_timestep ()
64 typeset_grob (col_p_);
67 note_column_l_arr_.clear ();
70 Collision_engraver::Collision_engraver ()
78 ENTER_DESCRIPTION(Collision_engraver,
80 /* creats*/ "NoteCollision",
81 /* acks */ "note-column-interface",