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"
14 Hara_kiri_engraver::get_spanner_p () const
16 return new Hara_kiri_group_spanner (get_property ("basicHaraKiriVerticalGroupspannerProperties"));
20 Hara_kiri_engraver::acknowledge_element (Score_element_info i
)
22 Axis_group_engraver::acknowledge_element (i
);
24 i
.elem_l_
->add_offset_callback (Hara_kiri_group_spanner::force_hara_kiri_callback
, Y_AXIS
);
26 if (Rhythmic_head
*h
= dynamic_cast<Rhythmic_head
*> (i
.elem_l_
))
28 dynamic_cast<Hara_kiri_group_spanner
*> (staffline_p_
)
29 ->add_interesting_item (h
);
33 ADD_THIS_TRANSLATOR(Hara_kiri_engraver
);