2 ledger-line-engraver.cc -- implement Ledger_line_engraver=
4 source file of the GNU LilyPond music typesetter
6 (c) 2004 Han-Wen Nienhuys <hanwen@xs4all.nl>
11 #include "group-interface.hh"
13 #include "engraver.hh"
15 class Ledger_line_engraver : public Engraver
20 TRANSLATOR_DECLARATIONS (Ledger_line_engraver);
23 virtual void finalize ();
24 virtual void process_music ();
25 virtual void acknowledge_grob (Grob_info);
28 Ledger_line_engraver::Ledger_line_engraver()
34 Ledger_line_engraver::process_music ()
38 span_ = make_spanner("LedgerLineSpanner", SCM_EOL);
40 span_->set_bound (LEFT, unsmob_grob (get_property ("currentCommandColumn")));
45 Ledger_line_engraver::finalize ()
48 span_->set_bound (RIGHT,unsmob_grob (get_property ("currentCommandColumn")));
53 Ledger_line_engraver::acknowledge_grob (Grob_info s)
55 Pointer_group_interface::add_grob (span_, ly_symbol2scm ("note-heads"),
58 ENTER_DESCRIPTION (Ledger_line_engraver,
59 "Creates the spanner to draw ledger lines, and notices objects that need ledger lines",
60 /* creats*/ "LedgerLineSpanner",
62 /* acks */ "custos-interface note-head-interface", // ledgered-interface?