Dispatcher *d = c->get_global_context ()->event_source ();
d->add_listener (GET_LISTENER (one_time_step), ly_symbol2scm ("OneTimeStep"));
d->add_listener (GET_LISTENER (prepare), ly_symbol2scm ("Prepare"));
Dispatcher *d = c->get_global_context ()->event_source ();
d->add_listener (GET_LISTENER (one_time_step), ly_symbol2scm ("OneTimeStep"));
d->add_listener (GET_LISTENER (prepare), ly_symbol2scm ("Prepare"));