From 929dad33bcc58974e0606e4ca294394bf5a3d104 Mon Sep 17 00:00:00 2001 From: fred Date: Tue, 26 Mar 2002 23:38:07 +0000 Subject: [PATCH] lilypond-1.3.42 --- lily/base-span-bar-engraver.cc | 95 -------------------------- lily/include/base-span-bar-engraver.hh | 46 ------------- 2 files changed, 141 deletions(-) delete mode 100644 lily/base-span-bar-engraver.cc delete mode 100644 lily/include/base-span-bar-engraver.hh diff --git a/lily/base-span-bar-engraver.cc b/lily/base-span-bar-engraver.cc deleted file mode 100644 index 3993776b42..0000000000 --- a/lily/base-span-bar-engraver.cc +++ /dev/null @@ -1,95 +0,0 @@ -/* - span-bar-grav.cc -- implement Base_span_bar_engraver - - source file of the GNU LilyPond music typesetter - - (c) 1997--2000 Han-Wen Nienhuys -*/ - -#include "dimension-cache.hh" -#include "lily-guile.hh" -#include "span-bar.hh" -#include "base-span-bar-engraver.hh" - -Base_span_bar_engraver::Base_span_bar_engraver() -{ - spanbar_p_ =0; - use_priority_b_ = true; -} - -Span_bar* -Base_span_bar_engraver::get_span_bar_p() const -{ - return new Span_bar; -} - - -void -Base_span_bar_engraver::acknowledge_element (Score_element_info i) -{ - int depth = i.origin_trans_l_arr (this).size(); - if (depth > 1 - && dynamic_cast (i.elem_l_)) - { - bar_l_arr_.push (dynamic_cast (i.elem_l_)); - - if (bar_l_arr_.size() >= 2 && !spanbar_p_) - /* - hmm, i do want a bracket with one staff some times, but not always - if (bar_l_arr_.size() >= 1 && !spanbar_p_) - - --jcn - */ - - /* - - use a property? get_property ("singleStaffBracket"); ? - - --hwn - */ - { - spanbar_p_ = get_span_bar_p(); - spanbar_p_->set_parent (bar_l_arr_[0], Y_AXIS); - - /* - UGH. UGH UUHGK GUHG G - */ - String visnam = String(name()) + "-visibility"; - - spanbar_p_->set_elt_property ("visibility-lambda", - scm_eval (ly_symbol2scm (visnam.ch_C()))); - - if (use_priority_b_) - { - spanbar_p_->set_elt_property ("break-aligned", SCM_BOOL_T); - } - else - { - spanbar_p_->set_parent (bar_l_arr_[0], X_AXIS); - } - - announce_element (Score_element_info (spanbar_p_,0)); - if (!gh_string_p (spanbar_p_->get_elt_property ("glyph"))) - spanbar_p_-> set_elt_property ("glyph", - bar_l_arr_[0]->get_elt_property ("glyph")); - } - } -} - -void -Base_span_bar_engraver::do_pre_move_processing() -{ - if (spanbar_p_) - { - for (int i=0; i < bar_l_arr_.size() ; i++) - spanbar_p_->add_bar (bar_l_arr_[i]); - typeset_element (spanbar_p_); - spanbar_p_ =0; - } - bar_l_arr_.set_size (0); -} - - - -ADD_THIS_TRANSLATOR(Base_span_bar_engraver); - diff --git a/lily/include/base-span-bar-engraver.hh b/lily/include/base-span-bar-engraver.hh deleted file mode 100644 index d3a360db3b..0000000000 --- a/lily/include/base-span-bar-engraver.hh +++ /dev/null @@ -1,46 +0,0 @@ -/* - base-span-bar-engraver.hh -- declare Span_bar_engraver - - source file of the GNU LilyPond music typesetter - - (c) 1997--2000 Han-Wen Nienhuys -*/ - - -#ifndef SPAN_BAR_GRAV_HH -#define SPAN_BAR_GRAV_HH - -#include "engraver.hh" -class Axis_align_spanner; -/** - - Make bars that span multiple "staffs". Catch bars, and span a - Span_bar over them if we find more than 2 bars. Vertical alignment - of staffs changes the appearance of spanbars. It is up to the - aligner (Vertical_align_engraver, in this case, to add extra - dependencies to the spanbars. - - */ -class Base_span_bar_engraver : public Engraver -{ - Span_bar * spanbar_p_; - Array bar_l_arr_; - -public: - VIRTUAL_COPY_CONS(Translator); - - - Base_span_bar_engraver(); -protected: - /** - Do we use break priorities? If true, use break_priority_i_ as - horizontal alignment priority, otherwise, hang the spanbar on the - acknowledged bar. */ - bool use_priority_b_; - - virtual void acknowledge_element (Score_element_info); - virtual void do_pre_move_processing(); - virtual Span_bar* get_span_bar_p() const; -}; - -#endif // SPAN_BAR_GRAV_HH -- 2.39.5