2 staff-collecting-engraver.cc -- implement Staff_collecting_engraver
4 source file of the GNU LilyPond music typesetter
6 (c) 2001--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
9 #include "staff-symbol.hh"
10 #include "engraver.hh"
14 class Staff_collecting_engraver : public Engraver
17 TRANSLATOR_DECLARATIONS (Staff_collecting_engraver);
18 DECLARE_ACKNOWLEDGER (staff_symbol);
21 Staff_collecting_engraver::Staff_collecting_engraver ()
26 Staff_collecting_engraver::acknowledge_staff_symbol (Grob_info gi)
28 SCM staffs = get_property ("stavesFound");
29 staffs = scm_cons (gi.grob ()->self_scm (), staffs);
31 context ()->set_property ("stavesFound", staffs);
34 #include "translator.icc"
35 ADD_ACKNOWLEDGER (Staff_collecting_engraver,staff_symbol);
37 ADD_TRANSLATOR (Staff_collecting_engraver,
38 /* doc */ "Maintain the stavesFound variable",
42 /* read */ "stavesFound",
43 /* write */ "stavesFound");