From: fred Date: Wed, 27 Mar 2002 00:34:15 +0000 (+0000) Subject: lilypond-1.3.115 X-Git-Tag: release/1.5.59~1059 X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=e614e42d4516ad02eb25c10259a40ed5c571c4de;p=lilypond.git lilypond-1.3.115 --- diff --git a/lily/include/music.hh b/lily/include/music.hh index a139ae28d4..c6b5339e4f 100644 --- a/lily/include/music.hh +++ b/lily/include/music.hh @@ -57,13 +57,11 @@ public: virtual void compress (Moment factor); VIRTUAL_COPY_CONS(Music); Music (Music const &m); - Music(); + Music (SCM); protected: - DECLARE_SMOBS(Music,); SCM immutable_property_alist_; SCM mutable_property_alist_; - }; diff --git a/lily/music.cc b/lily/music.cc index b807dec07e..d4b7d7b166 100644 --- a/lily/music.cc +++ b/lily/music.cc @@ -43,9 +43,9 @@ Music::Music (Music const &m) } -Music::Music() +Music::Music(SCM l) { - immutable_property_alist_ = SCM_EOL; + immutable_property_alist_ = l; mutable_property_alist_ = SCM_EOL; smobify_self (); }