lily/rest-collision-grav.cc

   1 /*
   2   rest-collision-reg.cc -- implement Rest_collision_engraver
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c)  1997--1998 Han-Wen Nienhuys <hanwen@stack.nl>
   7 */
   8
   9 #include "debug.hh"
  10 #include "rest-collision.hh"
  11 #include "rest-collision-grav.hh"
  12 #include "collision.hh"
  13 #include "note-column.hh"
  14
  15
  16 IMPLEMENT_IS_TYPE_B1(Rest_collision_engraver, Engraver);
  17 ADD_THIS_TRANSLATOR(Rest_collision_engraver);
  18
  19 Rest_collision_engraver::Rest_collision_engraver()
  20 {
  21   rest_collision_p_ =0;
  22 }
  23
  24 void
  25 Rest_collision_engraver::acknowledge_element (Score_elem_info i)
  26 {
  27   if (i.elem_l_->is_type_b (Note_column::static_name()))
  28     {
  29       // what should i do, what should _engraver do?
  30       if (!rest_collision_p_)
  31         {
  32           rest_collision_p_ = new Rest_collision;
  33           announce_element (Score_elem_info (rest_collision_p_, 0));
  34         }
  35       rest_collision_p_->add ((Note_column*)i.elem_l_->item());
  36     }
  37 }
  38
  39 void
  40 Rest_collision_engraver::do_pre_move_processing()
  41 {
  42   if (rest_collision_p_)
  43     {
  44       typeset_element (rest_collision_p_);
  45       rest_collision_p_ = 0;
  46     }
  47 }