]> git.donarmstrong.com Git - lilypond.git/blob - lily/rod.cc
new file.
[lilypond.git] / 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--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7   
8  */
9
10 #include "rod.hh"
11
12 #include "paper-column.hh"
13 #include "warn.hh"
14 #include "dimensions.hh"
15 #include "spaceable-grob.hh"
16
17 Rod::Rod ()
18 {
19   distance_ = 0.0;
20   item_l_drul_[LEFT] = item_l_drul_[RIGHT] = 0;
21 }
22
23
24
25 void
26 Rod::columnize ()
27 {
28   if (!item_l_drul_[LEFT]
29       || !item_l_drul_[RIGHT])
30     return ;
31   
32   Direction d = LEFT;
33   do {
34     Paper_column * pc = item_l_drul_[d]->get_column ();
35     distance_ += - d * item_l_drul_[d]->relative_coordinate (pc, X_AXIS);
36     item_l_drul_[d] = pc;
37   } while ((flip (&d))!= LEFT);
38
39 }
40
41 void
42 Rod::add_to_cols ()
43 {
44   columnize ();
45   if (item_l_drul_[LEFT] != item_l_drul_[RIGHT]
46       && item_l_drul_[LEFT] && item_l_drul_[RIGHT])
47     Spaceable_grob::add_rod (item_l_drul_[LEFT],
48                              item_l_drul_[RIGHT],
49                              distance_);
50 }
51