]> git.donarmstrong.com Git - lilypond.git/blob - lily/performer-group-performer.cc
release: 1.3.118
[lilypond.git] / lily / performer-group-performer.cc
1 /*
2   performer-group-performer.cc -- implement Performer_group_performer
3
4   source file of the GNU LilyPond music typesetter
5
6   (c) 1996--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7                Jan Nieuwenhuizen <janneke@gnu.org>
8  */
9
10 #include "performer-group-performer.hh"
11
12 #include "audio-element.hh"
13 #include "debug.hh"
14
15
16 ADD_THIS_TRANSLATOR(Performer_group_performer);
17
18
19 void
20 Performer_group_performer::announce_element (Audio_element_info info)
21 {
22   announce_info_arr_.push (info);
23   Performer::announce_element (info);
24 }
25
26
27
28 void
29 Performer_group_performer::create_audio_elements ()
30 {
31   for (SCM p = simple_trans_list_; gh_pair_p (p); p = gh_cdr ( p))
32     {
33       Translator * t = unsmob_translator (gh_car (p));
34       Performer * eng = dynamic_cast<Performer*> (t);
35       if (eng)
36         eng->create_audio_elements ();
37     }
38 }
39
40 void
41 Performer_group_performer::acknowledge_audio_elements ()
42 {
43   for (int j =0; j < announce_info_arr_.size(); j++)
44     {
45       Audio_element_info info = announce_info_arr_[j];
46
47       for (SCM p = simple_trans_list_; gh_pair_p (p); p = gh_cdr (p))
48         {
49           Translator * t = unsmob_translator (gh_car (p));
50           Performer * eng = dynamic_cast<Performer*> (t);
51           if (eng && eng!= info.origin_trans_l_)
52             eng->acknowledge_audio_element (info);
53         }
54     }
55 }
56
57 void
58 Performer_group_performer::do_announces()
59 {
60   for (SCM p = trans_group_list_; gh_pair_p (p); p =gh_cdr ( p))
61     {
62       Translator * t = unsmob_translator (gh_car (p));
63       dynamic_cast<Performer_group_performer*> (t)->do_announces ();
64     }
65
66   
67   create_audio_elements ();
68     
69   while (announce_info_arr_.size ())
70     {
71       acknowledge_audio_elements ();
72       announce_info_arr_.clear ();
73       create_audio_elements ();
74     }
75
76   if (announce_info_arr_.size ())
77     {
78       printf ("do_announces: elt: %s\n",
79               classname (announce_info_arr_[0].elem_l_));
80       announce_info_arr_.clear ();
81     }
82 }
83
84
85
86
87
88