2 staff-symbol-engraver.cc -- implement Staff_symbol_engraver
4 source file of the GNU LilyPond music typesetter
6 (c) 1997--2003 Han-Wen Nienhuys <hanwen@cs.uu.nl>
11 #include "paper-column.hh"
12 #include "paper-def.hh"
13 #include "side-position-interface.hh"
14 #include "engraver.hh"
18 Manage the staff symbol.
20 class Staff_symbol_engraver : public Engraver {
23 TRANSLATOR_DECLARATIONS(Staff_symbol_engraver);
26 virtual ~Staff_symbol_engraver ();
27 virtual void acknowledge_grob (Grob_info);
28 virtual void finalize ();
29 virtual void process_music ();
33 Staff_symbol_engraver::~Staff_symbol_engraver ()
38 Staff_symbol_engraver::Staff_symbol_engraver ()
44 Staff_symbol_engraver::process_music ()
48 span_ = make_spanner ("StaffSymbol");
50 span_->set_bound (LEFT, unsmob_grob (get_property ("currentCommandColumn")));
52 announce_grob(span_, SCM_EOL);
57 Staff_symbol_engraver::finalize ()
59 span_->set_bound (RIGHT,unsmob_grob (get_property ("currentCommandColumn")));
65 Staff_symbol_engraver::acknowledge_grob (Grob_info s)
67 s.grob_->set_grob_property ("staff-symbol", span_->self_scm ());
69 // remove this. probly not necessary?
70 s.grob_->add_dependency (span_); // UGH. UGH. UGH
76 ENTER_DESCRIPTION(Staff_symbol_engraver,
77 /* descr */ "create the constellation of five (default) "
79 /* creats*/ "StaffSymbol",
81 /* acks */ "grob-interface",