- Music_iterator *i = p->car_;
- children_p_list_.append (new Killing_cons<Music_iterator> (i->clone (), 0));
+ Music_iterator *i = unsmob_iterator (gh_car (s));
+ SCM cl = i->clone ()->self_scm();
+ *tail = scm_cons (cl, *tail);
+ tail = SCM_CDRLOC (*tail);
+ scm_gc_unprotect_object (cl);