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