/* We only need the most basic stuff to bootstrap the context tree */
event_source ()->add_listener (GET_LISTENER (create_context_from_event),
ly_symbol2scm ("CreateContext"));
- event_source ()->add_listener (GET_LISTENER (prepare),
+ event_source ()->add_listener (GET_LISTENER (Global_context, prepare),
ly_symbol2scm ("Prepare"));
events_below ()->register_as_listener (event_source_);
return extra_mom_pq_.size ();
}
-IMPLEMENT_LISTENER (Global_context, prepare);
void
Global_context::prepare (SCM sev)
{