*/
class Staff_symbol_engraver : public Engraver {
public:
- TRANSLATOR_DECLARATIONS(Staff_symbol_engraver);
+ TRANSLATOR_DECLARATIONS (Staff_symbol_engraver);
protected:
Spanner *span_;
span_->set_bound (LEFT, unsmob_grob (get_property ("currentCommandColumn")));
- announce_grob(span_, SCM_EOL);
+ announce_grob (span_, SCM_EOL);
}
}
-ENTER_DESCRIPTION(Staff_symbol_engraver,
+ENTER_DESCRIPTION (Staff_symbol_engraver,
/* descr */ "Create the constellation of five (default) "
"staff lines.",
/* creats*/ "StaffSymbol",
class Tab_staff_symbol_engraver : public Staff_symbol_engraver
{
public:
- TRANSLATOR_DECLARATIONS(Tab_staff_symbol_engraver);
+ TRANSLATOR_DECLARATIONS (Tab_staff_symbol_engraver);
protected:
virtual void process_music ();
};
Tab_staff_symbol_engraver::process_music ()
{
bool init = !span_;
- Staff_symbol_engraver::process_music();
+ Staff_symbol_engraver::process_music ();
if (init)
{
int k = scm_ilength (get_property ("stringTunings"));
if (k>=0)
- span_->set_property ("line-count", gh_int2scm (k));
+ span_->set_property ("line-count", scm_int2num (k));
}
}
-Tab_staff_symbol_engraver::Tab_staff_symbol_engraver()
+Tab_staff_symbol_engraver::Tab_staff_symbol_engraver ()
{
}
-ENTER_DESCRIPTION(Tab_staff_symbol_engraver,
+ENTER_DESCRIPTION (Tab_staff_symbol_engraver,
/* descr */ "Create a staff-symbol, but look at stringTunings for the number of lines."
"staff lines.",
/* creats*/ "StaffSymbol",