2 performer-group-performer.cc -- implement Performer_group_performer
4 source file of the GNU LilyPond music typesetter
6 (c) 1996--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7 Jan Nieuwenhuizen <janneke@gnu.org>
10 #include "performer-group-performer.hh"
12 #include "audio-element.hh"
16 ADD_THIS_TRANSLATOR(Performer_group_performer);
20 Performer_group_performer::announce_element (Audio_element_info info)
22 announce_info_arr_.push (info);
23 Performer::announce_element (info);
29 Performer_group_performer::do_announces()
31 for (SCM p = trans_group_list_; gh_pair_p (p); p =gh_cdr ( p))
33 Translator * t = unsmob_translator (gh_car (p));
34 dynamic_cast<Performer_group_performer*> (t)->do_announces ();
42 for (int j =0; j < announce_info_arr_.size(); j++)
44 Audio_element_info info = announce_info_arr_[j];
49 classname (announce_info_arr_[j].elem_l_));
50 announce_info_arr_.clear ();
53 for (SCM p = simple_trans_list_; gh_pair_p (p); p = gh_cdr (p))
55 Translator * t = unsmob_translator (gh_car (p));
56 Performer * eng = dynamic_cast<Performer*> (t);
57 if (eng && eng!= info.origin_trans_l_)
58 eng->acknowledge_element (info);
61 announce_info_arr_.clear ();
62 for (SCM p = simple_trans_list_; gh_pair_p (p); p = gh_cdr ( p))
64 Translator * t = unsmob_translator (gh_car (p));
65 Performer * eng = dynamic_cast<Performer*> (t);
67 eng->process_acknowledged ();
70 while (announce_info_arr_.size ());