midi2ly/lilypond-column.cc

   1 //
   2 // lilypond-column.cc -- implement Lilypond_column
   3 //
   4 // copyright 1997 Jan Nieuwenhuizen <janneke@gnu.org>
   5
   6 #include "lilypond-column.hh"
   7
   8 Lilypond_column::Lilypond_column (Lilypond_score* lilypond_score_l, Rational mom)
   9 {
  10   lilypond_score_l_ = lilypond_score_l;
  11   at_mom_ = mom;
  12 }
  13
  14 void
  15 Lilypond_column::add_item (Lilypond_item* lilypond_item_l)
  16 {
  17    lilypond_item_l_list_.append (new Cons<Lilypond_item> (lilypond_item_l, 0));
  18 }
  19
  20 Rational
  21 Lilypond_column::at_mom()
  22 {
  23   return at_mom_;
  24 }