}
Translator_group*
-Music_iterator::report_to () const
+Music_iterator::get_outlet () const
{
- return handle_.report_to ();
+ return handle_.get_outlet ();
}
void
return false;
}
-void
-Music_iterator::skip (Moment)
-{
-}
-SCM
-Music_iterator::get_pending_events (Moment)const
-{
- return SCM_EOL;
-}
SCM
Music_iterator::get_static_get_iterator (Music *m)
{
music_ = m;
assert (m);
- if (! report_to ())
+ if (! get_outlet ())
set_translator (report);
}
void
Music_iterator::substitute_outlet (Translator_group*f, Translator_group *t)
{
- if (report_to () == f)
+ if (get_outlet () == f)
set_translator (t);
derived_substitute (f,t);
}
SCM ip = get_static_get_iterator (m);
Music_iterator*p = unsmob_iterator (ip);
- p->init_translator (m, report_to ());
+ p->init_translator (m, get_outlet ());
p->construct_children ();
return ip;
Music_iterator*
Music_iterator::try_music (Music *m) const
{
- bool b = report_to ()->try_music ((Music*)m); // ugh
+ bool b = get_outlet ()->try_music ((Music*)m); // ugh
Music_iterator * it = b ? (Music_iterator*) this : 0; // ugh
if (!it)
it = try_music_in_children (m);
Careful with GC, although we intend the following as pointers
only, we _must_ mark them.
*/
- if (mus->report_to())
- scm_gc_mark (mus->report_to()->self_scm());
+ if (mus->get_outlet ())
+ scm_gc_mark (mus->get_outlet ()->self_scm());
if (mus->music_)
scm_gc_mark (mus->music_->self_scm());