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