2
tab-staff-symbol-engraver.cc -- implement Tab_staff_symbol_engraver
4
source file of the GNU LilyPond music typesetter
6
(c) 2005--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
9
#include "staff-symbol-engraver.hh"
12
class Tab_staff_symbol_engraver : public Staff_symbol_engraver
15
TRANSLATOR_DECLARATIONS (Tab_staff_symbol_engraver);
17
virtual void start_spanner ();
21
Tab_staff_symbol_engraver::start_spanner ()
24
Staff_symbol_engraver::start_spanner ();
27
int k = scm_ilength (get_property ("stringTunings"));
29
span_->set_property ("line-count", scm_from_int (k));
33
Tab_staff_symbol_engraver::Tab_staff_symbol_engraver ()
37
#include "translator.icc"
39
ADD_ACKNOWLEDGER (Tab_staff_symbol_engraver, grob);
40
ADD_TRANSLATOR (Tab_staff_symbol_engraver,
41
/* doc */ "Create a staff-symbol, but look at stringTunings for the number of lines."
43
/* create */ "StaffSymbol",
44
/* accept */ "staff-span-event",
45
/* read */ "stringTunings",