#include "string-convert.hh"
#include "warn.hh"
#include "audio-staff.hh"
-#include "audio-item.hh"
ADD_TRANSLATOR_GROUP (Score_performer,
/* doc */
void
Score_performer::prepare (SCM sev)
{
- Stream_event *ev = Stream_event::unsmob (sev);
+ Stream_event *ev = unsmob<Stream_event> (sev);
SCM sm = ev->get_property ("moment");
- Moment *m = Moment::unsmob (sm);
+ Moment *m = unsmob<Moment> (sm);
audio_column_ = new Audio_column (*m);
announce_element (Audio_element_info (audio_column_, 0));
precomputed_recurse_over_translators (context (), START_TRANSLATION_TIMESTEP, UP);
SCM channel_mapping = context ()->get_property ("midiChannelMapping");
bool use_ports = scm_is_eq (channel_mapping, ly_symbol2scm ("voice"));
performance_->ports_ = use_ports;
- recurse_over_translators (context (),
- &Translator::finalize,
- &Translator_group::finalize,
- UP);
+ recurse_over_translators
+ (context (),
+ Callback0_wrapper::make_smob<Translator, &Translator::finalize> (),
+ Callback0_wrapper::make_smob<Translator_group, &Translator_group::finalize> (),
+ UP);
}
void