partial: 0.1.7.jcn

diff --git a/lily/audio-staff.cc b/lily/audio-staff.cc
new file mode 100644 (file)
index 0000000..8dcae84
--- /dev/null
+++ b/lily/audio-staff.cc
@@ -0,0 +1,31 @@
+/*
+  audio-staff.cc -- implement Audio_staff
+
+  source file of the GNU LilyPond music typesetter
+
+  (c) 1997 Jan Nieuwenhuizen <jan@digicash.com>
+ */
+
+#include "audio-staff.hh"
+#include "audio-item.hh"
+#include "midi-item.hh"
+#include "midi-stream.hh"
+#include "midi-walker.hh"
+
+void
+Audio_staff::add( Audio_item* l )
+{
+    audio_item_l_list_.bottom().add( l );
+}
+
+void
+Audio_staff::output( Midi_stream& midi_stream_r, int track_i )
+{
+    Midi_track midi_track;
+    midi_track.number_i_ =  track_i;
+    for ( Midi_walker i( this, &midi_track ); i.ok(); i++ )
+       i.process();
+    midi_stream_r << midi_track;
+}
+
+IMPLEMENT_IS_TYPE_B1(Audio_staff, Audio_element);

diff --git a/lily/include/audio-staff.hh b/lily/include/audio-staff.hh
new file mode 100644 (file)
index 0000000..7e91d7f
--- /dev/null
+++ b/lily/include/audio-staff.hh
@@ -0,0 +1,23 @@
+/*
+  audio-staff.hh -- declare Audio_staff
+
+  (c) 1996, 1997 Jan Nieuwenhuizen <jan@digicash.com>
+ */
+
+#ifndef AUDIO_STAFF_HH
+#define AUDIO_STAFF_HH
+
+#include "proto.hh"
+#include "plist.hh"
+#include "lily-proto.hh"
+#include "audio-element.hh"
+
+struct Audio_staff : public Audio_element {
+    void add( Audio_item*  l);
+    void output( Midi_stream& midi_stream_r, int track_i );
+
+    Link_list<Audio_item*> audio_item_l_list_;
+    DECLARE_MY_RUNTIME_TYPEINFO;
+};
+
+#endif // AUDIO_STAFF_HH