lily/performer.cc

   1 /*
   2   performer.cc -- implement Performer
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 1996, 1997 Han-Wen Nienhuys <hanwen@stack.nl>
   7                Jan Nieuwenhuizen <jan@digicash.com>
   8  */
   9
  10
  11 #include "performer-group-performer.hh"
  12 #include "debug.hh"
  13
  14
  15 IMPLEMENT_IS_TYPE_B1(Performer, Translator);
  16
  17 void
  18 Performer::play (Audio_element* p)
  19 {
  20   daddy_perf_l ()->play (p);
  21 }
  22
  23 int
  24 Performer::get_tempo_i() const
  25 {
  26   return daddy_perf_l ()->get_tempo_i();
  27 }
  28
  29 Performer_group_performer*
  30 Performer::daddy_perf_l () const
  31 {
  32   return (daddy_trans_l_)
  33     ?(Performer_group_performer*) daddy_trans_l_->performer_l ()
  34     : 0;
  35 }