]> git.donarmstrong.com Git - lilypond.git/blob - lily/meter-grav.cc
release: 0.1.36
[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
15 Meter_engraver::Meter_engraver()
16
17   meter_p_ =0;
18 }
19
20 void
21 Meter_engraver::do_process_requests()
22 {
23   Timing_engraver * timing_grav_l= (Timing_engraver*)
24     daddy_grav_l()->get_simple_translator (Timing_engraver::static_name())
25     ->engraver_l ();
26   
27   Meter_change_req *req = timing_grav_l->meter_req_l();
28   if (req)
29     {
30       Array<Scalar> args;
31       args.push (req->beats_i_);
32       args.push (req->one_beat_i_);
33         
34       meter_p_ = new Meter (args);
35       meter_p_->break_priority_i_ = 1; // ugh
36     }
37
38   if (meter_p_)
39     announce_element (Score_elem_info (meter_p_, req));
40 }
41
42 void
43 Meter_engraver::do_pre_move_processing()
44 {
45   if (meter_p_) 
46     {
47       typeset_element (meter_p_);
48       meter_p_ =0;
49     }
50 }
51
52
53 ADD_THIS_TRANSLATOR(Meter_engraver);
54 IMPLEMENT_IS_TYPE_B1(Meter_engraver,Engraver);