source file of the GNU LilyPond music typesetter
- (c) 1997--2002 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+ (c) 1997--2003 Han-Wen Nienhuys <hanwen@cs.uu.nl>
*/
#include "translator-group.hh"
#include "warn.hh"
#include "simultaneous-music-iterator.hh"
#include "music-list.hh"
-#include "killing-cons.tcc"
+#include "translator-def.hh"
Simultaneous_music_iterator::Simultaneous_music_iterator ()
{
separate_contexts_b_
= src.separate_contexts_b_;
+ children_list_ = SCM_EOL;
SCM children_list = SCM_EOL;
SCM *tail = &children_list;
/* if separate_contexts_b_ is set, create a new context with the
number number as name */
-
+
+ SCM name = unsmob_translator_def (report_to ()->definition_)->get_context_name ();
Translator_group * t = (j && separate_contexts_b_)
- ? report_to ()->find_create_translator (report_to ()->type_string_,
- to_string (j))
+ ? report_to ()->find_create_translator (name, to_string (j), SCM_EOL)
: report_to ();
if (!t)