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 Performer::Performer()
  18 {
  19 }
  20
  21 void
  22 Performer::play (Audio_element* p)
  23 {
  24   daddy_perf_l ()->play (p);
  25 }
  26
  27 int
  28 Performer::get_tempo_i() const
  29 {
  30   return daddy_perf_l ()->get_tempo_i();
  31 }
  32
  33 Performer_group_performer*
  34 Performer::daddy_perf_l () const
  35 {
  36   return (daddy_trans_l_)
  37     ?(Performer_group_performer*) daddy_trans_l_->performer_l ()
  38     : 0;
  39 }