2 separating-group-spanner.cc -- implement Separating_group_spanner
4 source file of the GNU LilyPond music typesetter
6 (c) 1998--1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
10 #include "separating-group-spanner.hh"
11 #include "single-malt-grouping-item.hh"
13 #include "paper-def.hh"
16 Separating_group_spanner::get_rods () const
20 for (int i=0; i < spacing_unit_l_arr_.size () -1; i++)
22 Single_malt_grouping_item *l =spacing_unit_l_arr_[i];
23 Single_malt_grouping_item *lb
24 = dynamic_cast<Single_malt_grouping_item*>(l->find_prebroken_piece (RIGHT));
25 Single_malt_grouping_item *r = spacing_unit_l_arr_[i+1];
26 Single_malt_grouping_item *rb
27 = dynamic_cast<Single_malt_grouping_item*>(r->find_prebroken_piece (LEFT));
29 a.push (Rod (spacing_unit_l_arr_[i], spacing_unit_l_arr_[i+1]));
33 rod.distance_f_ += padding_f_;
45 rod.distance_f_ += padding_f_;
54 Separating_group_spanner::add_spacing_unit (Single_malt_grouping_item*i)
56 spacing_unit_l_arr_.push (i);
61 Separating_group_spanner::do_substitute_element_pointer (Score_element*o, Score_element*n)
63 if (dynamic_cast<Single_malt_grouping_item *> (o))
65 Single_malt_grouping_item*ns = dynamic_cast<Single_malt_grouping_item *> (n);
66 spacing_unit_l_arr_.substitute (dynamic_cast<Single_malt_grouping_item *> (o), ns);
70 Separating_group_spanner::Separating_group_spanner()
72 set_elt_property (break_helper_only_scm_sym, SCM_BOOL_T);