lily/rod.cc

   1 /*
   2   rod.cc --  implement Rod, Column_rod
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 1998 Han-Wen Nienhuys <hanwen@cs.ruu.nl>
   7
   8  */
   9 #include "rod.hh"
  10 #include "p-col.hh"
  11 #include "debug.hh"
  12 #include "single-malt-grouping-item.hh"
  13 #include "dimen.hh"
  14
  15
  16 Rod::Rod (Single_malt_grouping_item *l, Single_malt_grouping_item *r)
  17 {
  18   item_l_drul_[LEFT] =l;
  19   item_l_drul_[RIGHT]=r;
  20
  21   Interval li (l->my_width ());
  22   Interval ri (r->my_width ());
  23   if (li.empty_b () || ri.empty_b ())
  24     distance_f_ = 0;
  25   else
  26     distance_f_ = li[RIGHT] - ri[LEFT] + 1.5 PT; // ugh
  27 }
  28
  29 Rod::Rod ()
  30 {
  31   distance_f_ = 0.0;
  32   item_l_drul_[LEFT] = item_l_drul_[RIGHT] =0;
  33 }
  34
  35 void
  36 Column_rod::print () const
  37 {
  38 #ifndef NDEBUG
  39   DOUT << "Column_rod { rank = "
  40        << other_l_->rank_i () << ", dist = " << distance_f_ << "}\n";
  41 #endif
  42 }
  43
  44 Column_rod::Column_rod ()
  45 {
  46   distance_f_ = 0;
  47   other_l_ = 0;
  48 }
  49
  50 int
  51 Column_rod::compare (const Column_rod &r1, const Column_rod &r2)
  52 {
  53   return r1.other_l_->rank_i() - r2.other_l_->rank_i();
  54 }
  55 void
  56 Rod::add_to_cols ()
  57 {
  58   item_l_drul_[RIGHT]->column_l ()->add_rod
  59     (item_l_drul_[LEFT]->column_l (), distance_f_);
  60   item_l_drul_[LEFT]->column_l ()->add_rod
  61     (item_l_drul_[RIGHT]->column_l (), distance_f_);
  62 }