Pitch diff = pitch_interval (mp, qp);
ev = ev->clone ();
ev->make_transposable ();
Pitch diff = pitch_interval (mp, qp);
ev = ev->clone ();
ev->make_transposable ();
transposed_musics_ = scm_cons (ev->unprotect (), transposed_musics_);
}
quote_outlet_.get_context ()->event_source ()->broadcast (ev);
transposed_musics_ = scm_cons (ev->unprotect (), transposed_musics_);
}
quote_outlet_.get_context ()->event_source ()->broadcast (ev);