2 music-iterator.cc -- implement Music_iterator
4 source file of the GNU LilyPond music typesetter
6 (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
9 #include "music-list.hh"
10 #include "music-iterator.hh"
11 #include "voice-iterator.hh"
12 #include "property-iterator.hh"
13 #include "chord-iterator.hh"
14 #include "request-iterator.hh"
15 #include "translator-group.hh"
16 #include "translation-property.hh"
17 #include "change-iterator.hh"
18 #include "change-translator.hh"
20 IMPLEMENT_IS_TYPE_B(Music_iterator
);
24 Music_iterator::do_print() const
30 Music_iterator::print() const
35 DOUT
<< name() << "{";
36 DOUT
<< "report to " <<
37 report_to_l() << " (" << report_to_l ()->name () << ")\n";
39 DOUT
<< "next at " << next_moment() << " ";
41 DOUT
<< "not feeling well today..";
48 Music_iterator::get_req_translator_l()
50 assert (report_to_l());
51 if (report_to_l()->is_bottom_translator_b ())
54 set_translator (report_to_l()->get_default_interpreter ());
59 Music_iterator::push_translator (Translator_group
*t
)
61 report_to_l_arr_
.push (t
);
62 t
->iterator_count_
++;
66 Music_iterator::pop_translator()
68 report_to_l()->iterator_count_
--;
69 assert (report_to_l()->iterator_count_
>=0);
70 report_to_l_arr_
.pop();
74 Music_iterator::report_to_l() const
76 if (! report_to_l_arr_
.size())
78 return report_to_l_arr_
.top();
83 Music_iterator::set_translator (Translator_group
*trans
)
85 if (report_to_l()==trans
)
90 push_translator (trans
);
94 Music_iterator::construct_children()
99 Music_iterator::~Music_iterator()
105 Music_iterator::next_moment() const
111 Music_iterator::process_and_next (Moment
)
117 Music_iterator::ok() const
123 Music_iterator::static_get_iterator_p (Music
*m
,
124 Translator_group
*report_l
)
126 Music_iterator
* p
=0;
127 if (m
->is_type_b (Request_chord::static_name()))
128 p
= new Request_chord_iterator ((Request_chord
*) m
);
129 else if (m
->is_type_b (Chord::static_name()))
130 p
= new Chord_iterator ((Chord
*) m
);
131 else if (m
->is_type_b (Voice::static_name()))
132 p
= new Voice_iterator ((Voice
*) m
);
133 else if (m
->is_type_b (Translation_property::static_name ()))
134 p
= new Property_iterator((Translation_property
*) m
);
135 else if (m
->is_type_b (Change_translator::static_name ()))
136 p
= new Change_iterator((Change_translator
*) m
);
138 if (m
-> translator_type_str_
.length_i ())
140 Translator_group
* a
=report_l
->
141 find_create_translator_l (m
-> translator_type_str_
, m
->translator_id_str_
);
142 p
->set_translator (a
);
145 if (! p
->report_to_l())
146 p
->set_translator (report_l
);
152 Music_iterator::get_iterator_p (Music
*m
) const
154 Music_iterator
*p
= static_get_iterator_p (m
,report_to_l());
155 p
->daddy_iter_l_
= (Music_iterator
*)this;
156 p
->construct_children();
160 Music_iterator::Music_iterator()