lily/score-column.cc

   1 /*
   2   score-column.cc -- implement Score_column
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c)  1997--1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   7 */
   8
   9 #include "debug.hh"
  10 #include "paper-column.hh"
  11 #include "score-column.hh"
  12 #include "command-request.hh"
  13
  14 Score_column::Score_column (Moment w)
  15 {
  16   when_ = w;
  17 }
  18
  19 void
  20 Score_column::do_print() const
  21 {
  22 #ifndef NPRINT
  23   DEBUG_OUT << " at " <<  when_ << '\n';
  24   DEBUG_OUT << "Shortest playing: " <<  shortest_playing_mom_ << " shortest starter: " << shortest_starter_mom_;
  25   Paper_column::do_print();
  26 #endif
  27 }
  28
  29
  30 bool
  31 Score_column::musical_b () const
  32 {
  33   return shortest_starter_mom_ != Moment(0);
  34 }