]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/grid-point-engraver.cc
Run `make grand-replace'.
[lilypond.git] / lily / grid-point-engraver.cc
index c45ff0d459b6462ea1d04741440b393288ecfb51..32490757f82dda114a28d6ce0aa53eeaa20e9dc4 100644 (file)
@@ -3,8 +3,7 @@
 
   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"
@@ -18,21 +17,19 @@ 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);
     }
 }
 
@@ -40,11 +37,17 @@ Grid_point_engraver::Grid_point_engraver ()
 {
 }
 
-
 ADD_TRANSLATOR (Grid_point_engraver,
-               /* descr */ "generate grid points.",
-               /* creats*/ "GridPoint",
-               /* accepts */ "",
-               /* reads */ "gridInterval",
-               /* write */ "");
+               /* doc */
+               "Generate grid points.",
+
+               /* create */
+               "GridPoint ",
+
+               /* read */
+               "gridInterval ",
+
+               /* write */
+               ""
+               );