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);