]> git.donarmstrong.com Git - lilypond.git/blob - lily/performer.cc
release: 1.1.29
[lilypond.git] / lily / performer.cc
1 /*
2   performer.cc -- implement 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
11 #include "performer-group-performer.hh"
12 #include "debug.hh"
13
14
15
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     ?dynamic_cast<Performer_group_performer *> (daddy_trans_l_)
34     : 0;
35 }