2 grid-line-engraver.cc -- implement Grid_point_engraver
4 source file of the GNU LilyPond music typesetter
6 (c) 2005 Han-Wen Nienhuys <hanwen@xs4all.nl>
10 #include "engraver.hh"
14 #include "translator.icc"
16 class Grid_point_engraver : public Engraver
19 TRANSLATOR_DECLARATIONS (Grid_point_engraver);
21 PRECOMPUTED_VIRTUAL void process_music ();
25 Grid_point_engraver::process_music ()
27 SCM grid_interval = get_property ("gridInterval");
28 if (Moment *mom = unsmob_moment (grid_interval))
30 Moment now = now_mom ();
32 if (!now.main_part_.mod_rat (mom->main_part_))
34 make_item ("GridPoint", SCM_EOL);
39 Grid_point_engraver::Grid_point_engraver ()
44 ADD_TRANSLATOR (Grid_point_engraver,
45 /* descr */ "generate grid points.",
46 /* creats*/ "GridPoint",
48 /* reads */ "gridInterval",