source file of the GNU LilyPond music typesetter
- (c) 1997--2001 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+ (c) 1997--2002 Han-Wen Nienhuys <hanwen@cs.uu.nl>
*/
#include "translator-group.hh"
-#include "debug.hh"
+#include "warn.hh"
#include "simultaneous-music-iterator.hh"
#include "music-list.hh"
#include "killing-cons.tcc"
}
SCM
-Simultaneous_music_iterator::get_music (Moment m)const
+Simultaneous_music_iterator::get_pending_events (Moment m)const
{
SCM s = SCM_EOL;
for (Cons<Music_iterator> *p = children_p_list_.head_; p; p = p->next_)
{
- s = gh_append2 (p->car_->get_music (m), s);
+ s = gh_append2 (p->car_->get_pending_events (m), s);
}
return s;
}
{
int j = 0;
- SCM i = music_l ()->get_mus_property ("elements");
+ SCM i = get_music ()->get_mus_property ("elements");
for (; gh_pair_p (i); i = ly_cdr (i), j++)
{
Music *mus = unsmob_music (ly_car (i));
- Music_iterator * mi = static_get_iterator_p (mus);
+ Music_iterator * mi = get_static_get_iterator (mus);
/* if separate_contexts_b_ is set, create a new context with the
number number as name */
Translator_group * t = (j && separate_contexts_b_)
- ? report_to_l ()->find_create_translator_l (report_to_l ()->type_str_,
- to_str (j))
- : report_to_l ();
+ ? report_to ()->find_create_translator (report_to ()->type_string_,
+ to_string (j))
+ : report_to ();
if (!t)
- t = report_to_l ();
+ t = report_to ();
mi->init_translator (mus, t);
mi->construct_children ();