X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fslur-engraver.cc;h=581136791d932daff6148c2ad80d2b82366c095b;hb=ed3e5abd8003297e02e3f90dc8755e33a6619135;hp=0e2260395f8f523ac2b76ee892a0df48750900de;hpb=6754d3302bcce74ef78c27defc3e8900be27b4f8;p=lilypond.git diff --git a/lily/slur-engraver.cc b/lily/slur-engraver.cc index 0e2260395f..581136791d 100644 --- a/lily/slur-engraver.cc +++ b/lily/slur-engraver.cc @@ -37,8 +37,10 @@ class Slur_engraver : public Slur_proto_engraver protected: DECLARE_TRANSLATOR_LISTENER (slur); + DECLARE_TRANSLATOR_LISTENER (note); public: + SCM event_symbol (); TRANSLATOR_DECLARATIONS (Slur_engraver); }; @@ -47,6 +49,13 @@ Slur_engraver::Slur_engraver () : { } +SCM +Slur_engraver::event_symbol () +{ + // Need a string constant for memoization + return ly_symbol2scm ("slur-event"); +} + IMPLEMENT_TRANSLATOR_LISTENER (Slur_engraver, slur); void Slur_engraver::listen_slur (Stream_event *ev) @@ -54,6 +63,13 @@ Slur_engraver::listen_slur (Stream_event *ev) Slur_proto_engraver::listen_slur (ev); } +IMPLEMENT_TRANSLATOR_LISTENER (Slur_engraver, note); +void +Slur_engraver::listen_note (Stream_event *ev) +{ + Slur_proto_engraver::listen_note (ev); +} + void Slur_engraver::set_melisma (bool m) {