2 output-property-engraver.cc -- implement Output_property_engraver
4 source file of the GNU LilyPond music typesetter
6 (c) 2000--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
10 #include "engraver.hh"
14 #include "translator.icc"
17 class Output_property_engraver : public Engraver
19 TRANSLATOR_DECLARATIONS (Output_property_engraver);
21 vector<Music*> props_;
22 DECLARE_ACKNOWLEDGER (grob)
24 void stop_translation_timestep ();
25 virtual bool try_music (Music*);
30 Output_property_engraver::try_music (Music* m)
32 if (m->is_mus_type ("layout-instruction"))
41 Output_property_engraver::acknowledge_grob (Grob_info inf)
43 for (vsize i = props_.size (); i--;)
46 Context *d = inf.context ();
47 SCM proc = o->get_property ("procedure");
49 inf.grob ()->self_scm (),
51 context ()->self_scm ());
56 Output_property_engraver::stop_translation_timestep ()
61 Output_property_engraver::Output_property_engraver ()
65 ADD_ACKNOWLEDGER (Output_property_engraver,grob);
66 ADD_TRANSLATOR (Output_property_engraver,
69 "Apply a procedure to any grob acknowledged. ",