lily/hara-kiri-engraver.cc

   1 /*
   2   hara-kiri-engraver.cc --  implement Hara_kiri_engraver
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 1999--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   7
   8  */
   9 #include "hara-kiri-group-spanner.hh"
  10 #include "hara-kiri-engraver.hh"
  11 #include "rhythmic-head.hh"
  12
  13 Spanner*
  14 Hara_kiri_engraver::get_spanner_p () const
  15 {
  16   return new Hara_kiri_group_spanner (get_property ("basicHaraKiriVerticalGroupspannerProperties"));
  17 }
  18
  19 void
  20 Hara_kiri_engraver::acknowledge_element (Score_element_info i)
  21 {
  22   Axis_group_engraver::acknowledge_element (i);
  23
  24   i.elem_l_->add_offset_callback (Hara_kiri_group_spanner::force_hara_kiri_callback, Y_AXIS);
  25
  26   if (Rhythmic_head *h = dynamic_cast<Rhythmic_head *> (i.elem_l_))
  27     {
  28       dynamic_cast<Hara_kiri_group_spanner*> (staffline_p_)
  29         ->add_interesting_item (h);
  30     }
  31
  32 }
  33 ADD_THIS_TRANSLATOR(Hara_kiri_engraver);