X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Ftranslator-dispatch-list.cc;h=41d5a171827ceb5bdf065d3eaf5eeebd0bcf1884;hb=549033b9a02ebe4be5e3f5afae93a838d3bc912f;hp=ed968c571a5d504484cd99b1951af5b3b14b7c38;hpb=20a1118d86072c27a1f3eacbaa888c4ee3287ec6;p=lilypond.git

diff --git a/lily/translator-dispatch-list.cc b/lily/translator-dispatch-list.cc
index ed968c571a..41d5a17182 100644
--- a/lily/translator-dispatch-list.cc
+++ b/lily/translator-dispatch-list.cc
@@ -21,6 +21,8 @@
 #include "engraver.hh"
 
 
+const char * const Engraver_dispatch_list::type_p_name_ = 0;
+
 void
 Engraver_dispatch_list::apply (Grob_info gi)
 {
@@ -40,14 +42,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;