-#define TRANSLATOR_DECLARATIONS(NAME) \
- public: \
- NAME (); \
- VIRTUAL_COPY_CONSTRUCTOR (Translator, NAME); \
- static SCM static_description_; \
- static vector<Acknowledge_information> acknowledge_static_array_; \
- virtual void fetch_precomputable_methods (Translator_void_method_ptr methods[]); \
- virtual SCM static_translator_description () const; \
- virtual SCM translator_description () const; \
- virtual Engraver_void_function_engraver_grob_info get_acknowledger (SCM sym) \
- { \
- return static_get_acknowledger (sym); \
- } \
- static Engraver_void_function_engraver_grob_info static_get_acknowledger (SCM sym);
+ translator_listener_record ()
+ {
+ next_ = 0;
+ event_class_ = SCM_EOL;
+ get_listener_ = 0;
+ }
+
+} translator_listener_record;
+
+#define TRANSLATOR_DECLARATIONS_NO_LISTENER(NAME) \
+ public: \
+ NAME (); \
+ VIRTUAL_COPY_CONSTRUCTOR (Translator, NAME); \
+ static SCM static_description_; \
+ static Drul_array<vector<Acknowledge_information> > acknowledge_static_array_drul_; \
+ virtual void fetch_precomputable_methods (Callback methods[]); \
+ virtual SCM static_translator_description () const; \
+ virtual SCM translator_description () const; \
+ static Grob_info_callback static_get_acknowledger (SCM sym); \
+ static Grob_info_callback static_get_end_acknowledger(SCM); \
+ virtual Grob_info_callback get_acknowledger (SCM sym) \
+ { \
+ return static_get_acknowledger (sym); \
+ } \
+ virtual Grob_info_callback get_end_acknowledger (SCM sym) \
+ { \
+ return static_get_end_acknowledger (sym); \
+ } \
+ /* end #define */
+
+#define TRANSLATOR_DECLARATIONS(NAME) \
+ TRANSLATOR_DECLARATIONS_NO_LISTENER(NAME) \
+private: \
+ static translator_listener_record *listener_list_; \
+public: \
+ virtual translator_listener_record *get_listener_list () const \
+ { \
+ return listener_list_; \
+ } \
+ /* end #define */
+
+#define DECLARE_TRANSLATOR_LISTENER(m) \
+public: \
+inline void listen_ ## m (Stream_event *); \
+/* Should be private */ \
+static void _internal_declare_ ## m (); \
+private: \
+ static Listener _get_ ## m ## _listener (void *, SCM); \
+DECLARE_LISTENER (_listen_scm_ ## m);