2 ledger-line-engraver.cc -- implement Ledger_line_engraver
4 source file of the GNU LilyPond music typesetter
6 (c) 2004--2005 Han-Wen Nienhuys <hanwen@xs4all.nl>
9 #include "group-interface.hh"
11 #include "engraver.hh"
13 class Ledger_line_engraver : public Engraver
18 TRANSLATOR_DECLARATIONS (Ledger_line_engraver);
21 virtual void finalize ();
22 virtual void process_music ();
23 virtual void acknowledge_grob (Grob_info);
26 Ledger_line_engraver::Ledger_line_engraver ()
32 Ledger_line_engraver::process_music ()
36 span_ = make_spanner ("LedgerLineSpanner", SCM_EOL);
38 span_->set_bound (LEFT, unsmob_grob (get_property ("currentCommandColumn")));
43 Ledger_line_engraver::finalize ()
46 span_->set_bound (RIGHT, unsmob_grob (get_property ("currentCommandColumn")));
50 Ledger_line_engraver::acknowledge_grob (Grob_info s)
52 if (!to_boolean (s.grob_->get_property ("no-ledgers")))
53 Pointer_group_interface::add_grob (span_, ly_symbol2scm ("note-heads"),
56 ADD_TRANSLATOR (Ledger_line_engraver,
57 "Creates the spanner to draw ledger lines, and notices objects that need ledger lines",
58 /* creats*/ "LedgerLineSpanner",
60 /* acks */ "ledgered-interface", // ledgered-interface?