source file of the GNU LilyPond music typesetter
- (c) 2005 Han-Wen Nienhuys <hanwen@xs4all.nl>
-
+ (c) 2005--2009 Han-Wen Nienhuys <hanwen@xs4all.nl>
*/
#include "engraver.hh"
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);
}
}
{
}
-
ADD_TRANSLATOR (Grid_point_engraver,
- /* descr */ "generate grid points.",
- /* creats*/ "GridPoint",
- /* accepts */ "",
- /* reads */ "gridInterval",
- /* write */ "");
+ /* doc */
+ "Generate grid points.",
+
+ /* create */
+ "GridPoint ",
+
+ /* read */
+ "gridInterval ",
+
+ /* write */
+ ""
+ );