X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fdot-column-engraver.cc;h=ede002049f7358318fe54954fe430a0567c91a7f;hb=d194ee9f637a200ac26b59e818acf5ca37985dc9;hp=48b4500600b7d8b48507f61dd86614fc844d2fa6;hpb=a7f82e4dc22fc6219a9fe0f6874f8c91e3f31f24;p=lilypond.git diff --git a/lily/dot-column-engraver.cc b/lily/dot-column-engraver.cc index 48b4500600..ede002049f 100644 --- a/lily/dot-column-engraver.cc +++ b/lily/dot-column-engraver.cc @@ -3,76 +3,60 @@ source file of the GNU LilyPond music typesetter - (c) 1998--2005 Han-Wen Nienhuys + (c) 1998--2006 Han-Wen Nienhuys */ #include "rhythmic-head.hh" #include "dot-column.hh" #include "side-position-interface.hh" #include "engraver.hh" -#include "stem.hh" +#include "translator.icc" +#include "item.hh" class Dot_column_engraver : public Engraver { Grob *dotcol_; - Grob *stem_; - Link_array heads_; + vector heads_; public: TRANSLATOR_DECLARATIONS (Dot_column_engraver); protected: - virtual void acknowledge_grob (Grob_info); - PRECOMPUTED_VIRTUAL void stop_translation_timestep (); + + DECLARE_ACKNOWLEDGER (rhythmic_head); + + void stop_translation_timestep (); }; Dot_column_engraver::Dot_column_engraver () { dotcol_ = 0; - stem_ = 0; } void Dot_column_engraver::stop_translation_timestep () { - /* - Add the stem to the support so dots stay clear of flags. - - See [Ross, p 171] - */ - if (stem_ && dotcol_) - dotcol_->set_object ("stem", stem_->self_scm ()); - dotcol_ = 0; heads_.clear (); - stem_ = 0; } void -Dot_column_engraver::acknowledge_grob (Grob_info info) +Dot_column_engraver::acknowledge_rhythmic_head (Grob_info info) { Grob *d = unsmob_grob (info.grob ()->get_object ("dot")); if (d) { if (!dotcol_) - { - dotcol_ = make_item ("DotColumn", SCM_EOL); - } + dotcol_ = make_item ("DotColumn", SCM_EOL); Dot_column::add_head (dotcol_, info.grob ()); } - else if (Stem::has_interface (info.grob ())) - { - stem_ = info.grob (); - } } -#include "translator.icc" +ADD_ACKNOWLEDGER (Dot_column_engraver, rhythmic_head); ADD_TRANSLATOR (Dot_column_engraver, - /* descr */ "Engraves dots on dotted notes shifted to the right of the note.\n" + /* doc */ "Engraves dots on dotted notes shifted to the right of the note.\n" "If omitted, then dots appear on top of the notes.", - /* creats*/ "DotColumn", - /* accepts */ "", - /* acks */ "rhythmic-head-interface dot-column-interface stem-interface", - /* reads */ "", + /* create */ "DotColumn", + /* read */ "", /* write */ "");