2 span-bar-grav.cc -- implement Base_span_bar_engraver
4 source file of the GNU LilyPond music typesetter
6 (c) 1997--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
9 #include "dimension-cache.hh"
10 #include "lily-guile.hh"
11 #include "span-bar.hh"
12 #include "base-span-bar-engraver.hh"
14 Base_span_bar_engraver::Base_span_bar_engraver()
17 use_priority_b_
= true;
21 Base_span_bar_engraver::get_span_bar_p() const
28 Base_span_bar_engraver::acknowledge_element (Score_element_info i
)
30 int depth
= i
.origin_trans_l_arr (this).size();
32 && dynamic_cast<Bar
*> (i
.elem_l_
))
34 bar_l_arr_
.push (dynamic_cast<Bar
*> (i
.elem_l_
));
36 if (bar_l_arr_
.size() >= 2 && !spanbar_p_
)
38 hmm, i do want a bracket with one staff some times, but not always
39 if (bar_l_arr_.size() >= 1 && !spanbar_p_)
46 use a property? get_property ("singleStaffBracket"); ?
51 spanbar_p_
= get_span_bar_p();
52 spanbar_p_
->set_parent (bar_l_arr_
[0], Y_AXIS
);
57 String visnam
= String(name()) + "-visibility";
59 spanbar_p_
->set_elt_property ("visibility-lambda",
60 scm_eval (ly_symbol2scm (visnam
.ch_C())));
64 spanbar_p_
->set_elt_property ("break-aligned", SCM_BOOL_T
);
68 spanbar_p_
->set_parent (bar_l_arr_
[0], X_AXIS
);
71 announce_element (Score_element_info (spanbar_p_
,0));
72 if (!gh_string_p (spanbar_p_
->get_elt_property ("glyph")))
73 spanbar_p_
-> set_elt_property ("glyph",
74 bar_l_arr_
[0]->get_elt_property ("glyph"));
80 Base_span_bar_engraver::do_pre_move_processing()
84 for (int i
=0; i
< bar_l_arr_
.size() ; i
++)
85 spanbar_p_
->add_bar (bar_l_arr_
[i
]);
86 typeset_element (spanbar_p_
);
89 bar_l_arr_
.set_size (0);
94 ADD_THIS_TRANSLATOR(Base_span_bar_engraver
);