2003 -> 2004

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

diff --git a/lily/audio-column.cc b/lily/audio-column.cc
index 61513c1e20fbb527f347569d1dd875e11d6e7fe6..fb33b85fbd14fc9055534dd978eaf79ee10c03ad 100644 (file)
--- a/lily/audio-column.cc
+++ b/lily/audio-column.cc
@@ -3,43 +3,32 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c)  1997--1998 Jan Nieuwenhuizen <janneke@gnu.org>
+  (c) 1997--2004 Jan Nieuwenhuizen <janneke@gnu.org>
  */
 
 #include "audio-column.hh"
 #include "audio-item.hh"
 #include "performance.hh"
 
-#include "debug.hh"
+
 
 Audio_column::Audio_column (Moment at_mom)
 {
   at_mom_ = at_mom;
-  performance_l_ = 0;
+  performance_ = 0;
 }
 
 void
 Audio_column::add_audio_item (Audio_item* l)
 {
-  audio_item_l_list_.bottom().add (l);
-  l->audio_column_l_ = this; 
+  audio_items_.push (l);
+  l->audio_column_ = this; 
 }
 
 Moment
-Audio_column::at_mom() const
+Audio_column::at_mom () const
 {
   return at_mom_;
 }
 
-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 << classname (i.ptr ()) << ", ";
-  DOUT << "\n}\n";
-#endif 
-}