X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fdrum-note-performer.cc;h=9fce62808fe910892b122b99831e53bb7370894d;hb=5d84bfad4626892bcffd05adcced53c8a2329047;hp=6c565cd8e050623b31ef925b408a1422058314d4;hpb=47db9a3883d726ca53e2133a3b2298f78dd6a32e;p=lilypond.git diff --git a/lily/drum-note-performer.cc b/lily/drum-note-performer.cc index 6c565cd8e0..9fce62808f 100644 --- a/lily/drum-note-performer.cc +++ b/lily/drum-note-performer.cc @@ -33,12 +33,13 @@ public: protected: void stop_translation_timestep (); void process_music (); - DECLARE_TRANSLATOR_LISTENER (note); + void listen_note (Stream_event *); private: vector note_evs_; }; -Drum_note_performer::Drum_note_performer () +Drum_note_performer::Drum_note_performer (Context *c) + : Performer (c) { } @@ -55,10 +56,10 @@ Drum_note_performer::process_music () SCM defn = SCM_EOL; if (scm_is_symbol (sym) - && (scm_hash_table_p (tab) == SCM_BOOL_T)) + && to_boolean (scm_hash_table_p (tab))) defn = scm_hashq_ref (tab, sym, SCM_EOL); - if (Pitch *pit = Pitch::unsmob (defn)) + if (Pitch *pit = unsmob (defn)) { SCM articulations = n->get_property ("articulations"); Stream_event *tie_event = 0; @@ -66,7 +67,7 @@ Drum_note_performer::process_music () int velocity = 0; for (SCM s = articulations; scm_is_pair (s); s = scm_cdr (s)) { - Stream_event *ev = Stream_event::unsmob (scm_car (s)); + Stream_event *ev = unsmob (scm_car (s)); if (!ev) continue; @@ -96,13 +97,18 @@ Drum_note_performer::stop_translation_timestep () note_evs_.clear (); } -IMPLEMENT_TRANSLATOR_LISTENER (Drum_note_performer, note); void Drum_note_performer::listen_note (Stream_event *ev) { note_evs_.push_back (ev); } +void +Drum_note_performer::boot () +{ + ADD_LISTENER (Drum_note_performer, note); +} + ADD_TRANSLATOR (Drum_note_performer, /* doc */ "Play drum notes.",