X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Ftempo-performer.cc;h=967ae60e7067b7e6b803d85a81479690331f898c;hb=97a0169312a260933246ab224e4f8b0969871dd5;hp=f69166e9c51987fb24d0dbfae7ad384d33d77661;hpb=c054eb280fd9953596eb164f67b0f9d5555c5a32;p=lilypond.git diff --git a/lily/tempo-performer.cc b/lily/tempo-performer.cc index f69166e9c5..967ae60e70 100644 --- a/lily/tempo-performer.cc +++ b/lily/tempo-performer.cc @@ -47,7 +47,8 @@ Tempo_performer::derived_mark () const scm_gc_mark (last_tempo_); } -Tempo_performer::Tempo_performer () +Tempo_performer::Tempo_performer (Context *c) + : Performer (c) { last_tempo_ = SCM_EOL; audio_ = 0; @@ -61,10 +62,10 @@ void Tempo_performer::process_music () { SCM w = get_property ("tempoWholesPerMinute"); - if (Moment::is_smob (w) + if (unsmob (w) && !ly_is_equal (w, last_tempo_)) { - Rational r = Moment::unsmob (w)->main_part_; + Rational r = unsmob (w)->main_part_; r *= Rational (4, 1); audio_ = new Audio_tempo (r.to_int ()); @@ -85,6 +86,12 @@ Tempo_performer::stop_translation_timestep () } } +void +Tempo_performer::boot () +{ + +} + ADD_TRANSLATOR (Tempo_performer, /* doc */ "",