]> git.donarmstrong.com Git - lilypond.git/blob - lily/audio-column.cc
1dde79a5e98d63ed0a3105e87855046615c2b7d7
[lilypond.git] / 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--2000 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