]> git.donarmstrong.com Git - lilypond.git/blob - lily/rod.cc
2e6ab483dbf7f5b10bf7e4d4686b0ad47207f2d7
[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--2007 Han-Wen Nienhuys <hanwen@xs4all.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 void
40 Rod::add_to_cols ()
41 {
42   columnize ();
43   if (item_drul_[LEFT] != item_drul_[RIGHT]
44       && item_drul_[LEFT] && item_drul_[RIGHT])
45     Spaceable_grob::add_rod (item_drul_[LEFT],
46                              item_drul_[RIGHT],
47                              distance_);
48 }
49