]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/include/translator.icc
Issue 1375/1: Let Translator constructor take a Context argument
[lilypond.git] / lily / include / translator.icc
index 02f9fbe8c7b629dcb6852265148b3a3d837ad32d..20954ead0b6b1c670783ac07a8697421d55f0c6c 100644 (file)
@@ -36,7 +36,7 @@
   static void _ ## T ## _adder ()                                       \
   {                                                                     \
     T::boot ();                                                         \
-    T *t = new T;                                                       \
+    T *t = new T(0);                                                    \
     T::static_description_ =                                            \
       scm_permanent_object (t->static_translator_description ());       \
     add_translator (t);                                                 \
@@ -102,11 +102,15 @@ void add_acknowledger (SCM ptr,
 
 #define ADD_ACKNOWLEDGER(CLASS, NAME) ADD_ACKNOWLEDGER_FOR (CLASS, NAME, NAME)
 
+// ADD_END_ACKNOWLEDGER_FOR requires your NAME to actually be
+// end_whatever if you are utilizing acknowledge_end_whatever as a
+// different end acknowledger.
 #define ADD_END_ACKNOWLEDGER_FOR(CLASS, NAME, GROB)                     \
-  add_acknowledger (method_finder<&CLASS::acknowledge_end_ ## NAME> (), \
+  add_acknowledger (method_finder<&CLASS::acknowledge_ ## NAME> (),     \
                     #GROB, acknowledge_static_array_drul_[STOP])
 
-#define ADD_END_ACKNOWLEDGER(CLASS, NAME) ADD_END_ACKNOWLEDGER_FOR (CLASS, NAME, NAME)
+#define ADD_END_ACKNOWLEDGER(CLASS, NAME)               \
+  ADD_END_ACKNOWLEDGER_FOR (CLASS, end_ ## NAME, NAME)
 
 /*
   Implement the method cl::listen_##m, and make it listen to stream