#include "international.hh"
#include "lily-version.hh"
#include "main.hh"
-#include "midi-item.hh"
+#include "midi-chunk.hh"
#include "midi-stream.hh"
#include "score.hh"
#include "string-convert.hh"
}
void
-Performance::output (Midi_stream &midi_stream)
+Performance::output (Midi_stream &midi_stream) const
{
int tracks_ = audio_staffs_.size ();
- // ugh
- int clocks_per_4 = 384;
-
- midi_stream << Midi_header (1, tracks_, clocks_per_4);
- message (_ ("Track...") + " ");
+ midi_stream.write (Midi_header (1, tracks_, 384));
+ if (be_verbose_global)
+ progress_indication (_ ("Track...") + " ");
int channel = 0;
for (vsize i = 0; i < audio_staffs_.size (); i++)
}
void
-Performance::write_output (string out)
+Performance::write_output (string out) const
{
if (out == "-")
out = "lelie.midi";
}
+void
+Performance::process ()
+{
+}
+
+Performance *
+unsmob_performance (SCM x)
+{
+ return dynamic_cast<Performance*> (unsmob_music_output (x));
+}