]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/translator-dispatch-list.cc
Issue 4743/2: Regtest, Doc NR 4.3.2, Changes entry
[lilypond.git] / lily / translator-dispatch-list.cc
index 02de105da9b0ff246c6150e9c00d6a79dd274113..10bf06407598f452fffffd5b034caa42f7a2f7dc 100644 (file)
@@ -20,7 +20,6 @@
 #include "translator-dispatch-list.hh"
 #include "engraver.hh"
 
-ADD_SMOB_INIT (Engraver_dispatch_list);
 
 void
 Engraver_dispatch_list::apply (Grob_info gi)
@@ -41,14 +40,14 @@ Engraver_dispatch_list::create (SCM trans_list,
                                 SCM iface_list, Direction start_end)
 {
   SCM retval = Engraver_dispatch_list ().smobbed_copy ();
-  Engraver_dispatch_list *list = Engraver_dispatch_list::unsmob (retval);
+  Engraver_dispatch_list *list = unsmob<Engraver_dispatch_list> (retval);
 
   Engraver_dispatch_entry entry;
   bool found = false;
   for (SCM s = trans_list; scm_is_pair (s); s = scm_cdr (s))
     {
       Engraver *eng
-        = dynamic_cast<Engraver *> (Translator::unsmob (scm_car (s)));
+        = unsmob<Engraver> (scm_car (s));
 
       if (!eng)
         continue;