2 hara-kiri-line-group-engraver.cc -- implement Hara_kiri_line_group_engraver
4 source file of the GNU LilyPond music typesetter
6 (c) 1998 Jan Nieuwenhuizen <janneke@gnu.org>
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"
15 IMPLEMENT_IS_TYPE_B1 (Hara_kiri_line_group_engraver,Line_group_engraver_group);
16 ADD_THIS_TRANSLATOR (Hara_kiri_line_group_engraver);
19 Hara_kiri_line_group_engraver::create_line_spanner ()
21 staffline_p_ = new Hara_kiri_vertical_group_spanner;
25 Hara_kiri_line_group_engraver::typeset_element(Score_element * e)
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));
31 Line_group_engraver_group::typeset_element (e);