X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Ftime-scaled-music.cc;h=2b79cc390b9eef526fbc7c2cbc0a198e7086df88;hb=5cee1f33692a248c1e8439e6629003735c9c24c1;hp=868cedf3c0a057201ac2c246b74d1993d46520b3;hpb=8da6cef580cce3365b219f6aca429b434cb60fcf;p=lilypond.git

diff --git a/lily/time-scaled-music.cc b/lily/time-scaled-music.cc
index 868cedf3c0..2b79cc390b 100644
--- a/lily/time-scaled-music.cc
+++ b/lily/time-scaled-music.cc
@@ -3,23 +3,26 @@
   
   source file of the GNU LilyPond music typesetter
   
-  (c) 1998--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+  (c) 1998--2002 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   
  */
 
 #include "time-scaled-music.hh"
 #include "time-scaled-music-iterator.hh"
 
-Time_scaled_music::Time_scaled_music (int n, int d,Music *mp)
-  : Music_wrapper (mp)
+Time_scaled_music::Time_scaled_music (SCM l)
+  : Music_wrapper (l)
 {
-  num_i_ = n;
-  den_i_ = d;
-  compress (Moment (num_i_,den_i_));
-  set_mus_property ("type",
+  set_mus_property ("iterator-ctor",
 		    Time_scaled_music_iterator::constructor_cxx_function);
+  
 }
 
+Time_scaled_music::Time_scaled_music ()
+{
+  
+}
 
 
 
+ADD_MUSIC (Time_scaled_music);