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
  14 IMPLEMENT_STATIC_NAME(Meter_performer);
  15 IMPLEMENT_IS_TYPE_B1(Meter_performer,Performer);
  16 ADD_THIS_PERFORMER(Meter_performer);
  17
  18 Meter_performer::Meter_performer()
  19 {
  20     meter_req_l_ = 0;
  21 }
  22
  23 Meter_performer::~Meter_performer()
  24 {
  25 }
  26
  27 void
  28 Meter_performer::do_print() const
  29 {
  30 #ifndef NPRINT
  31     if ( meter_req_l_ )
  32         meter_req_l_->print();
  33 #endif
  34 }
  35
  36 void
  37 Meter_performer::process_requests()
  38 {
  39     if ( meter_req_l_ ) {
  40         Midi_time m( meter_req_l_->beats_i_, meter_req_l_->one_beat_i_, 18 );
  41         play_event( &m );
  42         meter_req_l_ = 0;
  43     }
  44 }
  45
  46 bool
  47 Meter_performer::try_request( Request* req_l )
  48 {
  49     if ( meter_req_l_ )
  50         return false;
  51
  52     if ( req_l->command() )
  53         meter_req_l_ = req_l->command()->meterchange();
  54
  55     if ( meter_req_l_ )
  56         return true;
  57
  58     return false;
  59 }
  60