]> git.donarmstrong.com Git - lilypond.git/blob - lily/meter-grav.cc
release: 0.1.11
[lilypond.git] / lily / meter-grav.cc
1 /*
2   meter-reg.cc -- implement Meter_engraver
3
4   source file of the GNU LilyPond music typesetter
5
6   (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
7 */
8
9 #include "meter-grav.hh"
10 #include "meter.hh"
11 #include "command-request.hh"
12 #include "timing-grav.hh"
13 #include "engraver-group.hh"
14 Meter_engraver::Meter_engraver()
15
16   meter_p_ =0;
17 }
18
19 void
20 Meter_engraver::do_process_requests()
21 {
22   Timing_engraver * timing_grav_l= (Timing_engraver*)
23     daddy_grav_l_->get_simple_engraver (Timing_engraver::static_name());
24   
25   Meter_change_req *req = timing_grav_l->meter_req_l();
26   if (req)
27     {
28       Array<Scalar> args;
29       args.push (req->beats_i_);
30       args.push (req->one_beat_i_);
31         
32       meter_p_ = new Meter (args);
33     }
34
35   if (meter_p_)
36     announce_element (Score_elem_info (meter_p_, req));
37 }
38
39 void
40 Meter_engraver::do_pre_move_processing()
41 {
42   if (meter_p_) 
43     {
44       typeset_element (meter_p_);
45       meter_p_ =0;
46     }
47 }
48
49
50 ADD_THIS_ENGRAVER(Meter_engraver);
51 IMPLEMENT_IS_TYPE_B1(Meter_engraver,Engraver);