* lexer-gcc-3.1.sh: Remove.
[lilypond/patrick.git] / lily / collision-engraver.cc
blob404c1a5c71b1d73736bd26f1af8f7c5f0d195326
1 /*
2 collision-engraver.cc -- implement Collision_engraver
4 source file of the GNU LilyPond music typesetter
6 (c) 1997--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
7 */
9 #include "engraver.hh"
10 #include "note-column.hh"
11 #include "note-collision.hh"
12 #include "axis-group-interface.hh"
14 class Collision_engraver : public Engraver
16 Item *col_;
17 vector<Grob*> note_columns_;
19 protected:
20 DECLARE_ACKNOWLEDGER (note_column);
21 void process_acknowledged ();
22 void stop_translation_timestep ();
23 public:
24 TRANSLATOR_DECLARATIONS (Collision_engraver);
27 void
28 Collision_engraver::process_acknowledged ()
30 if (col_ || note_columns_.size () < 2)
31 return;
32 if (!col_)
33 col_ = make_item ("NoteCollision", SCM_EOL);
35 for (vsize i = 0; i < note_columns_.size (); i++)
36 Note_collision_interface::add_column (col_, note_columns_[i]);
39 void
40 Collision_engraver::acknowledge_note_column (Grob_info i)
42 if (Note_column::has_interface (i.grob ()))
44 /*should check Y axis? */
45 if (Note_column::has_rests (i.grob ()) || i.grob ()->get_parent (X_AXIS))
46 return;
48 note_columns_.push_back (i.grob ());
52 void
53 Collision_engraver::stop_translation_timestep ()
55 col_ = 0;
56 note_columns_.clear ();
59 Collision_engraver::Collision_engraver ()
61 col_ = 0;
64 #include "translator.icc"
66 ADD_ACKNOWLEDGER (Collision_engraver, note_column);
68 ADD_TRANSLATOR (Collision_engraver,
69 /* doc */ "Collect NoteColumns, and as soon as there are two or more, put them in a NoteCollision object.",
70 /* create */ "NoteCollision",
71 /* accept */ "",
72 /* read */ "",
73 /* write */ "");