2 This file is part of LilyPond, the GNU music typesetter.
4 Copyright (C) 1997--2012 Han-Wen Nienhuys <hanwen@xs4all.nl>
5 Jan Nieuwenhuizen <janneke@gnu.org>
7 LilyPond is free software: you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation, either version 3 of the License, or
10 (at your option) any later version.
12 LilyPond is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with LilyPond. If not, see <http://www.gnu.org/licenses/>.
22 #include "score-engraver.hh"
27 #include "translator.icc"
30 generate bars. Either user ("|:"), or default (new measure)
32 class Bar_engraver : public Engraver
35 TRANSLATOR_DECLARATIONS (Bar_engraver);
38 void stop_translation_timestep ();
39 void process_acknowledged ();
41 DECLARE_END_ACKNOWLEDGER (spanner);
47 vector<Spanner *> spanners_;
50 Bar_engraver::Bar_engraver ()
56 Bar_engraver::create_bar ()
60 bar_ = make_item ("BarLine", SCM_EOL);
61 SCM gl = get_property ("whichBar");
62 if (scm_equal_p (gl, bar_->get_property ("glyph")) != SCM_BOOL_T)
63 bar_->set_property ("glyph", gl);
68 Bar_engraver should come *after* any engravers that
71 This is a little hairy : whichBar may be set by
72 Repeat_acknowledge_engraver::process_music, which is at score
73 context. This means that grobs could should be created after
74 process_music. We do stuff process_acknowledged (), just to be
79 Bar_engraver::process_acknowledged ()
81 if (!bar_ && scm_is_string (get_property ("whichBar")))
85 for (vsize i = 0; i < spanners_.size (); i++)
86 spanners_[i]->set_bound (RIGHT, bar_);
90 lines may only be broken if there is a barline in all staves
93 Bar_engraver::stop_translation_timestep ()
96 context ()->get_score_context ()->set_property ("forbidBreak", SCM_BOOL_T);
103 Bar_engraver::acknowledge_end_spanner (Grob_info gi)
105 Grob *g = gi.grob ();
107 if (to_boolean (g->get_property ("to-barline")))
108 spanners_.push_back (dynamic_cast<Spanner *> (g));
111 ADD_END_ACKNOWLEDGER (Bar_engraver, spanner);
113 ADD_TRANSLATOR (Bar_engraver,
115 "Create barlines. This engraver is controlled through the"
116 " @code{whichBar} property. If it has no bar line to create,"
117 " it will forbid a linebreak at this point. This engraver"
118 " is required to trigger the creation of clefs at the start"