]> git.donarmstrong.com Git - lilypond.git/blob - lily/melisma-engraver.cc
62e5d494f9e974a43f68724f832f8d64b349db70
[lilypond.git] / lily / melisma-engraver.cc
1 /*   
2   melisma-engraver.cc --  implement Melisma_engraver
3   
4   source file of the GNU LilyPond music typesetter
5   
6   (c) 1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7   
8  */
9
10 #include "engraver.hh"
11 #include "musical-request.hh"
12
13 /**
14    Signal existence of melismas.
15  */
16 class Melisma_engraver:public Engraver
17 {
18 public:
19   VIRTUAL_COPY_CONS(Translator);
20   bool do_try_music (Music *);
21 };
22
23 ADD_THIS_TRANSLATOR(Melisma_engraver);
24
25 bool
26 Melisma_engraver::do_try_music (Music *m ) 
27 {
28   if (dynamic_cast<Melisma_playing_req*>(m))
29     {
30       Scalar plain (get_property ("melismaBusy", 0));
31       Scalar slur (get_property ("slurMelismaBusy", 0));
32       Scalar tie (get_property ("tieMelismaBusy", 0));
33       return plain.to_bool () || slur.to_bool () || tie.to_bool ();
34     }
35   return false;
36 }