2 hara-kiri-engraver.cc -- implement Hara_kiri_engraver
4 source file of the GNU LilyPond music typesetter
6 (c) 1999--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
9 #include "hara-kiri-group-spanner.hh"
10 #include "hara-kiri-engraver.hh"
11 #include "rhythmic-head.hh"
15 Hara_kiri_engraver::get_spanner_p () const
17 Spanner
* sp
= new Spanner (get_property ("basicHaraKiriVerticalGroupspannerProperties"));
18 Hara_kiri_group_spanner::set_interface (sp
);
23 Hara_kiri_engraver::acknowledge_element (Score_element_info i
)
25 Axis_group_engraver::acknowledge_element (i
);
27 i
.elem_l_
->add_offset_callback (Hara_kiri_group_spanner::force_hara_kiri_callback
, Y_AXIS
);
29 if (Rhythmic_head
*h
= dynamic_cast<Rhythmic_head
*> (i
.elem_l_
))
31 Hara_kiri_group_spanner::add_interesting_item (staffline_p_
, h
);
34 ADD_THIS_TRANSLATOR(Hara_kiri_engraver
);