]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/custos-engraver.cc
(GUILE_ELLIPSIS): define to get clean
[lilypond.git] / lily / custos-engraver.cc
index 4ece68ae236c87ebfdd75b90c7675d2efbc5f7b1..56347d07a45dcd412652d6c79f51edc44696ec98 100644 (file)
@@ -17,7 +17,6 @@
 
 #include "translator.icc"
 
-
 /*
  * This class implements an engraver for custos symbols.
  *
@@ -29,8 +28,8 @@ class Custos_engraver : public Engraver
 public:
   TRANSLATOR_DECLARATIONS (Custos_engraver);
   void start_translation_timestep ();
-  DECLARE_ACKNOWLEDGER(bar);
-  DECLARE_ACKNOWLEDGER(note_head);
+  DECLARE_ACKNOWLEDGER (bar);
+  DECLARE_ACKNOWLEDGER (note_head);
   void process_acknowledged ();
   void stop_translation_timestep ();
   virtual void finalize ();
@@ -108,7 +107,7 @@ Custos_engraver::process_acknowledged ()
            p += scm_to_int (c0);
 
          c->set_property ("staff-position",
-                          scm_int2num (p));
+                          scm_from_int (p));
        }
 
       pitches_.clear ();
@@ -129,19 +128,16 @@ void
 Custos_engraver::finalize ()
 {
   for (int i = custodes_.size (); i--;)
-    {
-      custodes_[i]->suicide ();
-    }
+    custodes_[i]->suicide ();
   custodes_.clear ();
 }
 
-
-ADD_ACKNOWLEDGER(Custos_engraver,bar);
-ADD_ACKNOWLEDGER(Custos_engraver,note_head);
+ADD_ACKNOWLEDGER (Custos_engraver, bar);
+ADD_ACKNOWLEDGER (Custos_engraver, note_head);
 
 ADD_TRANSLATOR (Custos_engraver,
-               /* descr */ "",
-               /* creats*/ "Custos",
-               /* accepts */ "",
-               /* reads */ "",
+               /* doc */ "",
+               /* creat*/ "Custos",
+               /* accept */ "",
+               /* read */ "",
                /* write */ "");