2 beam-performer.cc -- implement Beam_performer
4 source file of the GNU LilyPond music typesetter
6 (c) 1996--2005 Jan Nieuwenhuizen <janneke@gnu.org>
9 #include "performer.hh"
10 #include "audio-item.hh"
11 #include "audio-column.hh"
12 #include "global-context.hh"
15 class Beam_performer : public Performer {
17 TRANSLATOR_DECLARATIONS (Beam_performer);
20 virtual bool try_music (Music *ev) ;
21 virtual void start_translation_timestep ();
22 virtual void process_music ();
23 void set_melisma (bool);
30 Beam_performer::Beam_performer ()
38 Beam_performer::process_music ()
55 Beam_performer::set_melisma (bool ml)
57 SCM b = get_property ("autoBeaming");
59 context ()->set_property ("beamMelismaBusy", ml ? SCM_BOOL_T :SCM_BOOL_F);
63 Beam_performer::start_translation_timestep ()
70 Beam_performer::try_music (Music *m)
72 if (m->is_mus_type ("beam-event"))
74 Direction d = to_dir (m->get_property ("span-direction"));
89 ADD_TRANSLATOR (Beam_performer,"","",
90 "beam-event","","","");