]> git.donarmstrong.com Git - lilypond.git/blob - lily/swallow-perf.cc
* lily/include/event.hh: remove file.
[lilypond.git] / lily / swallow-perf.cc
1 /*
2   swallow-performer.cc -- implement Swallow_performer
3
4   source file of the GNU LilyPond music typesetter
5
6   (c) 1997--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7 */
8
9 #include "performer.hh"
10 #include "music.hh"
11
12
13 class Swallow_performer : public Performer
14 {
15 public:
16   TRANSLATOR_DECLARATIONS (Swallow_performer);
17 protected:
18   virtual bool try_music (Music *);
19 };
20
21 bool
22 Swallow_performer::try_music (Music *m)
23 {
24   if (m->is_mus_type ("busy-playing-event")
25       || m->is_mus_type ("melisma-playing-event"))
26     return false;
27   else
28     return true;
29 }
30
31 Swallow_performer::Swallow_performer ()
32 {}
33
34 ADD_TRANSLATOR (Swallow_performer,
35                 /* descr */ "",
36                 /* creats*/ "",
37                 /* accepts */ "general-music",
38                 /* acks  */ "",
39                 /* reads */ "",
40                 /* write */ "");