From: Jan Nieuwenhuizen <janneke@gnu.org>
Date: Sat, 28 Sep 2002 08:50:12 +0000 (+0000)
Subject: (try_music): Compile kludge.
X-Git-Tag: release/1.7.1~9
X-Git-Url: https://git.donarmstrong.com/lilypond.git?a=commitdiff_plain;h=cb848a8d9505c9be2d6586872afd8406a358a0f7;p=lilypond.git

(try_music): Compile kludge.
---

diff --git a/ChangeLog b/ChangeLog
index 913c20b244..9c99565c10 100644
--- 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 6f697e9251..68313e8492 100644
--- 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);