]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/staff-symbol-engraver.cc
* lily/include/translator.hh (class Translator): rename
[lilypond.git] / lily / staff-symbol-engraver.cc
index 17e96949b4b3fdf4f2b14668fca6d3988d1e78cd..974c5ae1ebd1af643033a76607080882766dd278 100644 (file)
@@ -19,7 +19,7 @@
  */
 class Staff_symbol_engraver : public Engraver { 
 public:
-  TRANSLATOR_DECLARATIONS(Staff_symbol_engraver);
+  TRANSLATOR_DECLARATIONS (Staff_symbol_engraver);
   
 protected:
   Spanner *span_;
@@ -50,7 +50,7 @@ Staff_symbol_engraver::process_music ()
   
       span_->set_bound (LEFT, unsmob_grob (get_property ("currentCommandColumn")));
 
-      announce_grob(span_, SCM_EOL);
+      announce_grob (span_, SCM_EOL);
     }
 }
 
@@ -77,7 +77,7 @@ Staff_symbol_engraver::acknowledge_grob (Grob_info s)
 
 
 
-ENTER_DESCRIPTION(Staff_symbol_engraver,
+ENTER_DESCRIPTION (Staff_symbol_engraver,
 /* descr */       "Create the constellation of five (default) "
 "staff lines.",
 /* creats*/       "StaffSymbol",
@@ -92,7 +92,7 @@ ENTER_DESCRIPTION(Staff_symbol_engraver,
 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 ();
 };
@@ -101,20 +101,20 @@ void
 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",