-Translator*
-Performer_group_performer::get_default_interpreter()
-{
- // ?
- if ( is_bottom_performer_b() )
- return daddy_perf_l_->get_default_interpreter();
-
- Performer_group_performer *perf_p= itrans_l_->
- get_default_itrans_l()->get_group_performer_p();
- add(perf_p );
- if (perf_p->is_bottom_performer_b())
- return perf_p;
- else
- return perf_p->get_default_interpreter();
-}
-
-Moment
-Performer_group_performer::get_mom() const
-{
- Moment mom = Performer::get_mom();
-
- for ( int i = 0; i < nongroup_l_arr_.size(); i++ )
- nongroup_l_arr_[ i ]->set( mom );
-
- return mom;
-}
-
-bool
-Performer_group_performer::is_bottom_performer_b() const
-{
- return !itrans_l_->get_default_itrans_l();
-}
-
-
-void
-Performer_group_performer::process_requests()
-{
- for ( PCursor<Performer*> i( perf_p_list_.top() ); i.ok(); i++ )
- i->process_requests();
-}
-
-bool
-Performer_group_performer::do_try_request( Request* req_l )
-{
- bool hebbes_b =false;
- for (int i =0; !hebbes_b && i < nongroup_l_arr_.size() ; i++)
- hebbes_b =nongroup_l_arr_[i]->try_request(req_l);
- if ( !hebbes_b && daddy_perf_l_ )
- hebbes_b = daddy_perf_l_->try_request(req_l);
- return hebbes_b ;
-}
-
-void
-Performer_group_performer::do_print()const
-{
-#ifndef NPRINT
- for ( PCursor<Performer*> i( perf_p_list_.top() ); i.ok(); i++ )
- i->print();
-#endif
-}
-
-void
-Performer_group_performer::do_creation_processing()
-{
- for ( PCursor<Performer*> i( perf_p_list_.top() ); i.ok(); i++ )
- i->creation_processing();
-}
-
-void
-Performer_group_performer::do_removal_processing()
-{
- for ( PCursor<Performer*> i( perf_p_list_.top() ); i.ok(); i++ )
- i->do_removal_processing();
-}