]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/axis-group-element.cc
release: 1.3.10
[lilypond.git] / lily / axis-group-element.cc
index 306d9d481bf686b43528811fef4e4f352a169903..5992ea461455522ca4fa17bf50d877b6b6155042 100644 (file)
@@ -27,7 +27,7 @@ Axis_group_element::elem_l_arr () const
   for (SCM s = get_elt_property ("elements"); gh_pair_p (s); s = gh_cdr (s))
     {
       SCM e=gh_car (s); 
-      r.push (dynamic_cast<Score_element*>(SMOB_TO_TYPE (Score_element, e)));
+      r.push (unsmob_element (e));
     }
       
   return r;
@@ -85,7 +85,7 @@ Axis_group_element::extent_callback (Dimension_cache const *c)
   for (SCM s = me->get_elt_property ("elements"); gh_pair_p (s); s = gh_cdr (s))
     {
       SCM e=gh_car (s); 
-      Score_element * se = dynamic_cast<Score_element*>(SMOB_TO_TYPE (Score_element, e));
+      Score_element * se = SMOB_TO_TYPE (Score_element, e);
 
       Interval dims = se->extent (a);
       if (!dims.empty_b ())