lily/audio-staff.cc

   1 /*
   2   audio-staff.cc -- implement Audio_staff
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 1997 Jan Nieuwenhuizen <jan@digicash.com>
   7  */
   8
   9 #include "audio-staff.hh"
  10 #include "audio-item.hh"
  11 #include "midi-item.hh"
  12 #include "midi-stream.hh"
  13 #include "midi-walker.hh"
  14
  15 void
  16 Audio_staff::add (Audio_item* l)
  17 {
  18   audio_item_l_list_.bottom().add (l);
  19 }
  20
  21 void
  22 Audio_staff::output (Midi_stream& midi_stream_r, int track_i)
  23 {
  24   Midi_track midi_track;
  25   midi_track.number_i_ =  track_i;
  26   for (Midi_walker i (this, &midi_track); i.ok(); i++)
  27     i.process();
  28   midi_stream_r << midi_track;
  29 }
  30
  31 IMPLEMENT_IS_TYPE_B1(Audio_staff, Audio_element);