]> git.donarmstrong.com Git - lilypond.git/blob - lily/performer.cc
* lily/smobs.cc (protect_smob): switch off fancy smob protection
[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--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
7   Jan Nieuwenhuizen <janneke@gnu.org>
8 */
9
10 #include "context.hh"
11 #include "performer-group.hh"
12 #include "warn.hh"
13
14 void
15 Performer::play_element (Audio_element *p)
16 {
17   get_daddy_performer ()->play_element (p);
18 }
19
20 Performer_group *
21 Performer::get_daddy_performer () const
22 {
23   return
24     dynamic_cast<Performer_group *> (get_daddy_translator ());
25 }
26
27 void
28 Performer::acknowledge_audio_element (Audio_element_info)
29 {
30 }
31
32 void
33 Performer::create_audio_elements ()
34 {
35 }
36
37 void
38 Performer::announce_element (Audio_element_info i)
39 {
40   if (!i.origin_trans_)
41     i.origin_trans_ = this;
42
43   get_daddy_performer ()->announce_element (i);
44 }