2 span-bar-grav.cc -- implement Base_span_bar_engraver
4 source file of the GNU LilyPond music typesetter
6 (c) 1997--1999 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"
13 #include "axis-align-spanner.hh"
15 ADD_THIS_TRANSLATOR (Base_span_bar_engraver);
17 Base_span_bar_engraver::Base_span_bar_engraver()
20 use_priority_b_ = true;
24 Base_span_bar_engraver::get_span_bar_p() const
31 Base_span_bar_engraver::acknowledge_element (Score_element_info i)
33 int depth = i.origin_trans_l_arr_.size();
35 && dynamic_cast<Bar *> (i.elem_l_))
37 bar_l_arr_.push (dynamic_cast<Bar *> (i.elem_l_));
39 if (bar_l_arr_.size() >= 2 && !spanbar_p_)
41 hmm, i do want a bracket with one staff some times, but not always
42 if (bar_l_arr_.size() >= 1 && !spanbar_p_)
49 use a property? get_property ("singleStaffBracket", 0) ?
54 spanbar_p_ = get_span_bar_p ();
55 spanbar_p_->set_parent (bar_l_arr_[0], Y_AXIS);
56 String visnam = String(name()) + "-visibility";
58 spanbar_p_->set_elt_property ("visibility-lambda",
59 ly_eval_str (visnam.ch_C()));
63 spanbar_p_->set_elt_property ("break-aligned", SCM_BOOL_T);
67 spanbar_p_->set_parent (bar_l_arr_[0], X_AXIS);
70 announce_element (Score_element_info (spanbar_p_,0));
72 if (!gh_string_p (spanbar_p_->get_elt_property ("glyph"))
73 && !gh_string_p (spanbar_p_->get_elt_property ("default-glyph")))
74 spanbar_p_-> set_elt_property ("default-glyph",
75 bar_l_arr_[0]->get_elt_property ("default-glyph"));
81 Base_span_bar_engraver::do_pre_move_processing()
85 for (int i=0; i < bar_l_arr_.size() ; i++)
86 spanbar_p_->add_bar (bar_l_arr_[i]);
87 typeset_element (spanbar_p_);
90 bar_l_arr_.set_size (0);