2 melisma-engraver.cc -- implement Melisma_engraver
4 source file of the GNU LilyPond music typesetter
6 (c) 1999--2003 Han-Wen Nienhuys <hanwen@cs.uu.nl>
10 #include "engraver.hh"
13 #include "translator-group.hh"
16 Signal existence of melismas.
18 class Melisma_engraver:public Engraver
21 TRANSLATOR_DECLARATIONS(Melisma_engraver);
22 bool try_music (Music *);
27 Melisma_engraver::try_music (Music *m)
29 SCM melisma_properties = get_property ("melismaBusyProperties");
32 for (; gh_pair_p (melisma_properties);
33 melisma_properties = gh_cdr (melisma_properties))
35 busy = busy || to_boolean (internal_get_property (gh_car (melisma_properties)));
38 for the phrasing engraver we also need this.
40 daddy_trans_->set_property ("melismaEngraverBusy",gh_bool2scm (busy));
44 Melisma_engraver::Melisma_engraver()
48 ENTER_DESCRIPTION(Melisma_engraver,
51 /* accepts */ "melisma-playing-event",
53 /* reads */ "melismaBusy melismaBusyProperties slurMelismaBusy tieMelismaBusy beamMelismaBusy",
54 /* write */ "melismaEngraverBusy");