release: 1.3.47

[lilypond.git] / lily / audio-column.cc

diff --git a/lily/audio-column.cc b/lily/audio-column.cc
index 2f5ad611a68dc778118d1deb8961cf742951e7c3..1dde79a5e98d63ed0a3105e87855046615c2b7d7 100644 (file)
--- a/lily/audio-column.cc
+++ b/lily/audio-column.cc
@@ -3,7 +3,7 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c)  1997--1998 Jan Nieuwenhuizen <jan@digicash.com>
+  (c)  1997--2000 Jan Nieuwenhuizen <janneke@gnu.org>
  */
 
 #include "audio-column.hh"
@@ -19,9 +19,9 @@ Audio_column::Audio_column (Moment at_mom)
 }
 
 void
-Audio_column::add (Audio_item* l)
+Audio_column::add_audio_item (Audio_item* l)
 {
-  audio_item_l_list_.bottom().add (l);
+  audio_item_l_arr_.push (l);
   l->audio_column_l_ = this; 
 }
 
@@ -35,11 +35,11 @@ void
 Audio_column::print() const
 {
 #ifndef NPRINT
-  DOUT << "Audio_column {";
-  DOUT << "at: " << at_mom_ << ". Contains:";
-  for (PCursor<Audio_item*> i (audio_item_l_list_.top ()); i.ok (); i++)
-    DOUT << i->name () << ", ";
-  DOUT << "\n}\n";
+  DEBUG_OUT << "Audio_column {";
+  DEBUG_OUT << "at: " << at_mom_ << ". Contains:";
+  for (int i =0; i < audio_item_l_arr_.size (); i++)
+    DEBUG_OUT << classname (audio_item_l_arr_[i]) << ", ";
+  DEBUG_OUT << "\n}\n";
 #endif 
 }