2 input-translator.cc -- implement Input_translator
4 source file of the GNU LilyPond music typesetter
6 (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
10 #include "engraver.hh"
11 #include "input-translator.hh"
13 #include "input-translator.hh"
14 #include "engraver-group.hh"
15 #include "performer-group-performer.hh"
18 Input_translator::is_name_b(String n)
20 for (int i=0; i < alias_str_arr_.size(); i++)
21 if (alias_str_arr_[i] == n)
27 Input_translator::print() const
30 mtor << base_str_ <<" " << type_str_<<" {\n";
31 mtor << "Consists of ";
32 for (int i=0; i< consists_str_arr_.size(); i++)
33 mtor << consists_str_arr_[i] << ',';
34 if (contains_itrans_p_list_.size())
35 mtor << "\nContains " ;
36 for (PCursor<Input_translator*> i(contains_itrans_p_list_.top()); i.ok(); i++)
45 Input_translator::recursive_find(String nm)
50 Input_translator * r =0;
52 PCursor<Input_translator*> i(contains_itrans_p_list_.top());
53 for (; !r &&i.ok(); i++) {
54 if (i->recursive_find(nm))
62 Input_translator::find_itrans_l(String nm)
64 for (PCursor<Input_translator*> i(contains_itrans_p_list_.top()); i.ok(); i++)
65 if (i->is_name_b( nm))
72 Engraver_group_engraver *
73 Input_translator::get_group_engraver_p()
75 assert (base_str_ == "Engraver");
76 Engraver_group_engraver * grav_p = (Engraver_group_engraver*)
77 get_engraver_p(type_str_);
79 for (int i=0; i < consists_str_arr_.size(); i++) {
80 grav_p->add( get_engraver_p( consists_str_arr_[i]) );
82 grav_p->itrans_l_ = this;
83 grav_p->id_str_ = default_id_str_;
87 Performer_group_performer*
88 Input_translator::get_group_performer_p()
90 assert (base_str_ == "Performer");
91 Performer_group_performer * perf_p = (Performer_group_performer*)
92 get_performer_p(type_str_);
94 for (int i=0; i < consists_str_arr_.size(); i++) {
95 perf_p->add( get_performer_p( consists_str_arr_[i]) );
97 perf_p->itrans_l_ = this;
98 perf_p->id_str_ = default_id_str_;
103 Input_translator::accept_req_b()
105 return ! contains_itrans_p_list_.size();
109 Input_translator::add(Input_translator *ip)
111 contains_itrans_p_list_.bottom().add(ip);
115 Input_translator::get_default_itrans_l()
117 if ( contains_itrans_p_list_.size() )
118 return contains_itrans_p_list_.top();
124 Input_translator_list::Input_translator_list(Input_translator_list const &s)
126 for (PCursor<Input_translator*> pc(s); pc.ok(); pc++) {
127 Input_translator *q = pc;
128 Input_translator *p=new Input_translator(*q) ;