lily/hara-kiri-line-group-engraver.cc

   1 /*
   2   hara-kiri-line-group-engraver.cc -- implement Hara_kiri_line_group_engraver
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c)  1998 Jan Nieuwenhuizen <janneke@gnu.org>
   7 */
   8
   9 #include "staff-sym.hh"
  10 #include "command-request.hh"
  11 #include "note-head.hh"
  12 #include "hara-kiri-vertical-group-spanner.hh"
  13 #include "hara-kiri-line-group-engraver.hh"
  14
  15 IMPLEMENT_IS_TYPE_B1 (Hara_kiri_line_group_engraver,Line_group_engraver_group);
  16 ADD_THIS_TRANSLATOR (Hara_kiri_line_group_engraver);
  17
  18 void
  19 Hara_kiri_line_group_engraver::create_line_spanner ()
  20 {
  21   staffline_p_ = new Hara_kiri_vertical_group_spanner;
  22 }
  23
  24 void
  25 Hara_kiri_line_group_engraver::typeset_element(Score_element * e)
  26 {
  27   if (e->is_type_b (Note_head::static_name ()))
  28     ((Hara_kiri_vertical_group_spanner*)staffline_p_)->add_note
  29       ((Note_head*)dynamic_cast <Item *> (e));
  30
  31   Line_group_engraver_group::typeset_element (e);
  32 }
  33