]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/grid-point-engraver.cc
Run `make grand-replace'.
[lilypond.git] / lily / grid-point-engraver.cc
index e28c30fbee90a2ecf84000729ba9de7a1d504978..32490757f82dda114a28d6ce0aa53eeaa20e9dc4 100644 (file)
@@ -3,34 +3,33 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c) 2005 Han-Wen Nienhuys <hanwen@xs4all.nl>
-
+  (c) 2005--2008 Han-Wen Nienhuys <hanwen@xs4all.nl>
 */
 
 #include "engraver.hh"
 #include "item.hh"
 #include "moment.hh"
 
+#include "translator.icc"
+
 class Grid_point_engraver : public Engraver
 {
 public:
   TRANSLATOR_DECLARATIONS (Grid_point_engraver);
 protected:
-  PRECOMPUTED_VIRTUAL void process_music ();
+  void process_music ();
 };
 
 void
 Grid_point_engraver::process_music ()
 {
-  SCM  grid_interval = get_property ("gridInterval");
+  SCM grid_interval = get_property ("gridInterval");
   if (Moment *mom = unsmob_moment (grid_interval))
     {
       Moment now = now_mom ();
 
       if (!now.main_part_.mod_rat (mom->main_part_))
-       {
-         make_item ("GridPoint", SCM_EOL);
-       }
+       make_item ("GridPoint", SCM_EOL);
     }
 }
 
@@ -38,13 +37,17 @@ Grid_point_engraver::Grid_point_engraver ()
 {
 }
 
-#include "translator.icc"
-
 ADD_TRANSLATOR (Grid_point_engraver,
-               /* descr */ "generate grid points.",
-               /* creats*/ "GridPoint",
-               /* accepts */ "",
-               /* acks  */ "",
-               /* reads */ "gridInterval",
-               /* write */ "");
+               /* doc */
+               "Generate grid points.",
+
+               /* create */
+               "GridPoint ",
+
+               /* read */
+               "gridInterval ",
+
+               /* write */
+               ""
+               );