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,  1997--1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   7                Jan Nieuwenhuizen <janneke@gnu.org>
   8  */
   9
  10 #include "performer-group-performer.hh"
  11
  12 #include "debug.hh"
  13
  14
  15 ADD_THIS_TRANSLATOR(Performer_group_performer);
  16
  17
  18 void
  19 Performer_group_performer::announce_element (Audio_element_info info)
  20 {
  21   announce_info_arr_.push (info);
  22   Performer::announce_element (info);
  23 }
  24
  25 void
  26 Performer_group_performer::do_announces()
  27 {
  28    for (Cons<Translator> *p = trans_p_list_.head_; p; p = p->next_)
  29     {
  30       if (Performer_group_performer *trg =  dynamic_cast <Performer_group_performer *> (p->car_))
  31         trg->do_announces ();
  32     }
  33
  34
  35   Request dummy_req;
  36
  37   while (announce_info_arr_.size ())
  38     {
  39       for (int j =0; j < announce_info_arr_.size(); j++)
  40         {
  41           Audio_element_info info = announce_info_arr_[j];
  42
  43           if (!info.req_l_)
  44             info.req_l_ = &dummy_req;
  45
  46           for (Cons<Translator> *p = trans_p_list_.head_; p; p = p->next_)
  47             {
  48               if (!dynamic_cast <Performer_group_performer *> (p->car_))
  49                 {
  50                   Performer * eng = dynamic_cast<Performer*> (p->car_);
  51                   // urg, huh? core dump?
  52                   //if (eng && eng!= info.origin_trans_l_arr_[0])
  53                   if (eng && info.origin_trans_l_arr_.size ()
  54                       && eng!= info.origin_trans_l_arr_[0])
  55                     eng->acknowledge_element (info);
  56                 }
  57             }
  58           announce_info_arr_.clear ();
  59
  60
  61           for (Cons<Translator> *p = trans_p_list_.head_; p; p = p->next_)
  62             {
  63               if (!dynamic_cast <Performer_group_performer *> (p->car_))
  64                 {
  65                   Performer * eng = dynamic_cast<Performer*> (p->car_);
  66                   if (eng)
  67                     eng->process_acknowledged ();
  68                 }
  69             }
  70         }
  71     }
  72 }
  73