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 "sequential-music-iterator.hh"
#include "music-list.hh"
-/*
- move to context of child iterator if it is deeper down in the
- hierarchy.
- */
-void
-Sequential_music_iterator::descend_to_child ()
-{
- Translator_group * child_report = child_report = iter_p_->report_to_l ();
- Translator_group * me_report = report_to_l ();
-
- Translator_group * c = child_report;
- while (c && c != me_report)
- {
- c= c->daddy_trans_l_;
- }
-
- if (c == me_report)
- set_translator (child_report);
-}
+
IMPLEMENT_CTOR_CALLBACK (Sequential_music_iterator);
SCM
Sequential_music_iterator::get_music_list()const
{
- return dynamic_cast<Music_sequence const*> (music_l ())->music_list ();
+ return dynamic_cast<Music_sequence const*> (get_music ())->music_list ();
}