lily/audio-column.cc

   1 /*
   2   audio-column.cc -- implement Audio_column
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c)  1997--1999 Jan Nieuwenhuizen <janneke@gnu.org>
   7  */
   8
   9 #include "audio-column.hh"
  10 #include "audio-item.hh"
  11 #include "performance.hh"
  12
  13 #include "debug.hh"
  14
  15 Audio_column::Audio_column (Moment at_mom)
  16 {
  17   at_mom_ = at_mom;
  18   performance_l_ = 0;
  19 }
  20
  21 void
  22 Audio_column::add_audio_item (Audio_item* l)
  23 {
  24   audio_item_l_arr_.push (l);
  25   l->audio_column_l_ = this;
  26 }
  27
  28 Moment
  29 Audio_column::at_mom() const
  30 {
  31   return at_mom_;
  32 }
  33
  34 void
  35 Audio_column::print() const
  36 {
  37 #ifndef NPRINT
  38   DEBUG_OUT << "Audio_column {";
  39   DEBUG_OUT << "at: " << at_mom_ << ". Contains:";
  40   for (int i =0; i < audio_item_l_arr_.size (); i++)
  41     DEBUG_OUT << classname (audio_item_l_arr_[i]) << ", ";
  42   DEBUG_OUT << "\n}\n";
  43 #endif
  44 }
  45