2 dot-column-engraver.cc -- implement Dot_column_engraver
4 source file of the GNU LilyPond music typesetter
6 (c) 1998--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
9 #include "rhythmic-head.hh"
10 #include "dot-column.hh"
11 #include "side-position-interface.hh"
12 #include "engraver.hh"
13 #include "translator.icc"
16 class Dot_column_engraver : public Engraver
21 TRANSLATOR_DECLARATIONS (Dot_column_engraver);
25 DECLARE_ACKNOWLEDGER (rhythmic_head);
27 void stop_translation_timestep ();
30 Dot_column_engraver::Dot_column_engraver ()
36 Dot_column_engraver::stop_translation_timestep ()
43 Dot_column_engraver::acknowledge_rhythmic_head (Grob_info info)
45 Grob *d = unsmob_grob (info.grob ()->get_object ("dot"));
49 dotcol_ = make_item ("DotColumn", SCM_EOL);
51 Dot_column::add_head (dotcol_, info.grob ());
56 ADD_ACKNOWLEDGER (Dot_column_engraver, rhythmic_head);
57 ADD_TRANSLATOR (Dot_column_engraver,
58 /* doc */ "Engraves dots on dotted notes shifted to the right of the note.\n"
59 "If omitted, then dots appear on top of the notes.",
60 /* create */ "DotColumn",