source file of the GNU LilyPond music typesetter
- (c) 2005 Han-Wen Nienhuys <hanwen@xs4all.nl>
-
+ (c) 2005--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
*/
#include "staff-symbol-engraver.hh"
{
int k = scm_ilength (get_property ("stringTunings"));
if (k >= 0)
- span_->set_property ("line-count", scm_int2num (k));
+ span_->set_property ("line-count", scm_from_int (k));
}
}
#include "translator.icc"
-ADD_ACKNOWLEDGER(Tab_staff_symbol_engraver,grob);
+ADD_ACKNOWLEDGER (Tab_staff_symbol_engraver, grob);
ADD_TRANSLATOR (Tab_staff_symbol_engraver,
- /* descr */ "Create a staff-symbol, but look at stringTunings for the number of lines."
+ /* doc */ "Create a staff-symbol, but look at stringTunings for the number of lines."
"staff lines.",
- /* creats*/ "StaffSymbol",
- /* accepts */ "staff-span-event",
- /* reads */ "stringTunings",
+ /* create */ "StaffSymbol",
+ /* accept */ "staff-span-event",
+ /* read */ "stringTunings",
/* write */ "");