]> git.donarmstrong.com Git - lilypond.git/blob - lily/meter-performer.cc
release: 0.0.78
[lilypond.git] / lily / meter-performer.cc
1 /*
2   meter-performer.cc -- implement Meter_performer
3
4   source file of the GNU LilyPond music typesetter
5
6   (c) 1997 Jan Nieuwenhuizen <jan@digicash.com>
7 */
8
9 #include "meter-performer.hh"
10 #include "command-request.hh"
11 #include "midi-item.hh"
12
13 IMPLEMENT_IS_TYPE_B1(Meter_performer,Performer);
14 ADD_THIS_PERFORMER(Meter_performer);
15
16 Meter_performer::Meter_performer()
17 {
18     meter_req_l_ = 0;
19 }
20
21 Meter_performer::~Meter_performer()
22 {
23 }
24
25 void 
26 Meter_performer::do_print() const
27 {
28 #ifndef NPRINT
29     if ( meter_req_l_ )
30         meter_req_l_->print();
31 #endif
32 }
33
34 void
35 Meter_performer::process_requests()
36 {
37     if ( meter_req_l_ ) {
38         Midi_time m( meter_req_l_->beats_i_, meter_req_l_->one_beat_i_, 18 );
39         play_event( &m );
40         meter_req_l_ = 0;
41     }
42 }
43
44 bool
45 Meter_performer::do_try_request( Request* req_l )
46 {
47     if ( meter_req_l_ )
48         return false;
49
50     if ( req_l->command() )
51         meter_req_l_ = req_l->command()->meterchange();
52
53     if ( meter_req_l_ )
54         return true;
55
56     return false;
57 }
58