(try_music): Compile kludge.

diff --git a/ChangeLog b/ChangeLog
index 913c20b2440cdfac00e088b798c29e5f9ad42420..9c99565c10aa0f28436c6d39be0f5210c63105eb 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2002-09-28  Jan Nieuwenhuizen  <janneke@gnu.org>
+
+       * lily/tuplet-engraver.cc (try_music): Compile kludge.
+
 2002-09-28  Han-Wen Nienhuys  <hanwen@cs.uu.nl>
 
        * lily/*.cc: specify accepts for many engravers.

diff --git a/lily/tuplet-engraver.cc b/lily/tuplet-engraver.cc
index 6f697e9251b91dde045d3c953d9c0a7975325c05..68313e84922799f4d387cff66c31b83c1a730b47 100644 (file)
--- a/lily/tuplet-engraver.cc
+++ b/lily/tuplet-engraver.cc
@@ -42,9 +42,15 @@ protected:
 bool
 Tuplet_engraver::try_music (Music *r)
 {
-  if ( c->is_mus_type ("time-scaled-music"))
+#if 1
+  if (Time_scaled_music * c = dynamic_cast<Time_scaled_music *> (r))
     {
       Music *el = c->element ();
+#else    
+  if (r->is_mus_type ("time-scaled-music"))
+    {
+      Music *el = unsmob_music (c->get_mus_property ("element"));
+#endif
       if (!dynamic_cast<Request_chord*> (el))
        {
          time_scaled_musics_.push (c);