patch::: 1.3.86.jcn3

[lilypond.git] / lily / simultaneous-music-iterator.cc

diff --git a/lily/simultaneous-music-iterator.cc b/lily/simultaneous-music-iterator.cc
index 08f337c0658371d4b4e60df4df43cba6b883dc3b..252a288f0d397938a8f86b2b82c7f07863530ac0 100644 (file)
--- a/lily/simultaneous-music-iterator.cc
+++ b/lily/simultaneous-music-iterator.cc
@@ -55,10 +55,9 @@ SCM
 Simultaneous_music_iterator::get_music ()
 {
   SCM s = SCM_EOL;
-  //  SCM t = report_to_l ()-self_scm ();
   for (Cons<Music_iterator> *p = children_p_list_.head_; p; p = p->next_)
     {
-      scm_cons (p->car_->get_music (), s);
+      s = gh_append2 (p->car_->get_music (), s);
     }
   return s;
 }