#include "scm-hash.hh"
#include "warn.hh"
-ADD_SMOB_INIT (Translator_group);
-
void
translator_each (SCM list, Translator_method method)
{
}
context_ = c;
- c->event_source ()->add_listener (GET_LISTENER (create_child_translator),
+ c->event_source ()->add_listener (GET_LISTENER (Translator_group, create_child_translator),
ly_symbol2scm ("AnnounceNewContext"));
for (SCM tr_list = simple_trans_list_; scm_is_pair (tr_list); tr_list = scm_cdr (tr_list))
{
Translator *tr = Translator::unsmob (scm_car (tr_list));
tr->disconnect_from_context (context_);
}
- context_->event_source ()->remove_listener (GET_LISTENER (create_child_translator),
+ context_->event_source ()->remove_listener (GET_LISTENER (Translator_group, create_child_translator),
ly_symbol2scm ("AnnounceNewContext"));
context_ = 0;
protected_events_ = SCM_EOL;
Both filter_performers and filter_engravers used to use a direct dynamic_cast
on the unsmobbed translator to be filtered, i.e.,
- if (dynamic_cast<Performer *> (Translator::unsmob (scm_car (*tail))))
+ if (Performer::unsmob (scm_car (*tail)))
but this caused mysterious optimisation issues in several GUB builds. See
issue #818 for the background to this change.
Create a new translator for a newly created child context. Triggered
by AnnounceNewContext events.
*/
-IMPLEMENT_LISTENER (Translator_group, create_child_translator);
void
Translator_group::create_child_translator (SCM sev)
{