X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fspan-bar-engraver.cc;h=732c206f3c0dc0a404f34916a68f95c9df6eec52;hb=47db9a3883d726ca53e2133a3b2298f78dd6a32e;hp=b3709e73363ef087ded28c6843203ef4b102dbc4;hpb=a9d9433bc7b95cb2d4b3d96eefce7a8437c0d44e;p=lilypond.git diff --git a/lily/span-bar-engraver.cc b/lily/span-bar-engraver.cc index b3709e7336..732c206f3c 100644 --- a/lily/span-bar-engraver.cc +++ b/lily/span-bar-engraver.cc @@ -1,15 +1,25 @@ /* - span-bar-engraver.cc -- implement Span_bar_engraver + This file is part of LilyPond, the GNU music typesetter. - source file of the GNU LilyPond music typesetter + Copyright (C) 1997--2015 Han-Wen Nienhuys - (c) 1997--2009 Han-Wen Nienhuys + LilyPond is free software: you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation, either version 3 of the License, or + (at your option) any later version. + + LilyPond is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with LilyPond. If not, see . */ -#include "bar-line.hh" #include "item.hh" -#include "span-bar.hh" #include "engraver.hh" +#include "pointer-group-interface.hh" /** @@ -22,35 +32,48 @@ dependencies to the spanbars. class Span_bar_engraver : public Engraver { Item *spanbar_; - vector bars_; + bool make_spanbar_; + vector bars_; public: TRANSLATOR_DECLARATIONS (Span_bar_engraver); protected: DECLARE_ACKNOWLEDGER (bar_line); void stop_translation_timestep (); + void process_acknowledged (); }; Span_bar_engraver::Span_bar_engraver () { spanbar_ = 0; + make_spanbar_ = false; } void Span_bar_engraver::acknowledge_bar_line (Grob_info i) { int depth = i.origin_contexts (this).size (); - if (depth && Bar_line::has_interface (i.grob ())) + if (depth && !i.grob ()->internal_has_interface (ly_symbol2scm ("span-bar-interface"))) { Item *it = dynamic_cast (i.grob ()); bars_.push_back (it); if (bars_.size () >= 2 && !spanbar_) - { - spanbar_ = make_item ("SpanBar", SCM_EOL); + make_spanbar_ = true; + } +} + +void +Span_bar_engraver::process_acknowledged () +{ + if (make_spanbar_) + { + spanbar_ = make_item ("SpanBar", SCM_EOL); - spanbar_->set_parent (bars_[0], X_AXIS); - } + spanbar_->set_parent (bars_[0], X_AXIS); + for (vsize i = 0; i < bars_.size (); i++) + Pointer_group_interface::add_grob (spanbar_, ly_symbol2scm ("elements"), bars_[i]); + make_spanbar_ = false; } } @@ -59,14 +82,10 @@ Span_bar_engraver::stop_translation_timestep () { if (spanbar_) { - for (vsize i = 0; i < bars_.size (); i++) - Span_bar::add_bar (spanbar_, bars_[i]); - - SCM vissym = ly_symbol2scm ("break-visibility"); - SCM vis = bars_[0]->internal_get_property (vissym); - if (ly_is_equal (spanbar_->internal_get_property (vissym), vis)) - spanbar_->set_property (vissym, vis); - + SCM vis = bars_[0]->get_property ("break-visibility"); + if (ly_is_equal (spanbar_->get_property ("break-visibility"), vis)) + spanbar_->set_property ("break-visibility", vis); + scm_call_1 (ly_lily_module_constant ("span-bar::notify-grobs-of-my-existence"), spanbar_->self_scm ()); spanbar_ = 0; } bars_.resize (0); @@ -76,16 +95,16 @@ Span_bar_engraver::stop_translation_timestep () ADD_ACKNOWLEDGER (Span_bar_engraver, bar_line); ADD_TRANSLATOR (Span_bar_engraver, - /* doc */ - "Make cross-staff bar lines: It catches all normal bar lines" - " and draws a single span bar across them.", + /* doc */ + "Make cross-staff bar lines: It catches all normal bar lines" + " and draws a single span bar across them.", - /* create */ - "SpanBar ", + /* create */ + "SpanBar ", - /* read */ - "", + /* read */ + "", - /* write */ - "" - ); + /* write */ + "" + );