release: 1.3.110

[lilypond.git] / lily / time-scaled-music.cc

diff --git a/lily/time-scaled-music.cc b/lily/time-scaled-music.cc
index 868cedf3c0a057201ac2c246b74d1993d46520b3..a0d355ef9df21e7ad0b0aec8c8b2456209309587 100644 (file)
--- a/lily/time-scaled-music.cc
+++ b/lily/time-scaled-music.cc
@@ -13,11 +13,12 @@
 Time_scaled_music::Time_scaled_music (int n, int d,Music *mp)
   : Music_wrapper (mp)
 {
-  num_i_ = n;
-  den_i_ = d;
-  compress (Moment (num_i_,den_i_));
+  set_mus_property ("numerator", gh_int2scm (n));
+  set_mus_property ("denominator", gh_int2scm (d));
   set_mus_property ("type",
                    Time_scaled_music_iterator::constructor_cxx_function);
+  
+  compress (Moment (n,d));
 }