]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/dots-engraver.cc
Release: bump Welcome versions.
[lilypond.git] / lily / dots-engraver.cc
index b58bd46912038a0828e4f44402e7339d4ae99a2b..eb0f48722637577644b3274ce7c03e0747233fc8 100644 (file)
 
 class Dots_engraver : public Engraver
 {
-  DECLARE_ACKNOWLEDGER (rhythmic_head);
+  void acknowledge_rhythmic_head (Grob_info);
   TRANSLATOR_DECLARATIONS (Dots_engraver);
 };
 
-Dots_engraver::Dots_engraver ()
+Dots_engraver::Dots_engraver (Context *c)
+  : Engraver (c)
 {
 }
 
@@ -43,10 +44,10 @@ Dots_engraver::acknowledge_rhythmic_head (Grob_info gi)
     return;
 
   Grob *note = gi.grob ();
-  if (Grob::is_smob (note->get_object ("dot")))
+  if (unsmob<Grob> (note->get_object ("dot")))
     return;
 
-  Duration *dur = Duration::unsmob (cause->get_property ("duration"));
+  Duration *dur = unsmob<Duration> (cause->get_property ("duration"));
   if (dur && dur->dot_count ())
     {
       Item *d = make_item ("Dots", note->self_scm ());
@@ -56,7 +57,12 @@ Dots_engraver::acknowledge_rhythmic_head (Grob_info gi)
     }
 }
 
-ADD_ACKNOWLEDGER (Dots_engraver, rhythmic_head);
+
+void
+Dots_engraver::boot ()
+{
+  ADD_ACKNOWLEDGER (Dots_engraver, rhythmic_head);
+}
 
 ADD_TRANSLATOR (Dots_engraver,
                 "Create @ref{Dots} objects for"