-/*
+/*
melisma-engraver.cc -- implement Melisma_engraver
-
+
source file of the GNU LilyPond music typesetter
-
+
(c) 1999--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
-
- */
+*/
#include "engraver.hh"
#include "grob.hh"
/**
Signal existence of melismas.
- */
+*/
class Melisma_translator : public Translator
{
public:
virtual bool try_music (Music *);
virtual void process_music ();
virtual void start_translation_timestep ();
- Music * event_;
+ Music *event_;
};
-
bool
-Melisma_translator::try_music (Music *m)
+Melisma_translator::try_music (Music *m)
{
if (m->is_mus_type ("melisma-playing-event"))
{
else
context ()->unset_property (ly_symbol2scm ("melismaBusy"));
}
-
+
}
void
{
event_ = 0;
}
-
+
Melisma_translator::Melisma_translator ()
{
event_ = 0;
}
ADD_TRANSLATOR (Melisma_translator,
-/* descr */ "This translator collects melisma information about ties, beams, and user settings (@code{melismaBusy}, and signals it to the @code{\addlyrics} code. ",
-/* creats*/ "",
-/* accepts */ "melisma-playing-event melisma-span-event",
-/* acks */ "",
-/* reads */ "melismaBusy melismaBusyProperties slurMelismaBusy tieMelismaBusy beamMelismaBusy",
-/* write */ "");
+ /* descr */ "This translator collects melisma information about ties, beams, and user settings (@code{melismaBusy}, and signals it to the @code{\addlyrics} code. ",
+ /* creats*/ "",
+ /* accepts */ "melisma-playing-event melisma-span-event",
+ /* acks */ "",
+ /* reads */ "melismaBusy melismaBusyProperties slurMelismaBusy tieMelismaBusy beamMelismaBusy",
+ /* write */ "");