2 This file is part of LilyPond, the GNU music typesetter.
4 Copyright (C) 1997--2015 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 void acknowledge_end_spanner (Grob_info);
47 vector<Spanner *> spanners_;
50 Bar_engraver::Bar_engraver (Context *c)
57 Bar_engraver::create_bar ()
61 bar_ = make_item ("BarLine", SCM_EOL);
62 SCM gl = get_property ("whichBar");
63 if (!ly_is_equal (gl, bar_->get_property ("glyph")))
64 bar_->set_property ("glyph", gl);
69 Bar_engraver should come *after* any engravers that
72 This is a little hairy : whichBar may be set by
73 Repeat_acknowledge_engraver::process_music, which is at score
74 context. This means that grobs could should be created after
75 process_music. We do stuff process_acknowledged (), just to be
80 Bar_engraver::process_acknowledged ()
82 if (!bar_ && scm_is_string (get_property ("whichBar")))
86 for (vsize i = 0; i < spanners_.size (); i++)
87 spanners_[i]->set_bound (RIGHT, bar_);
91 lines may only be broken if there is a barline in all staves
94 Bar_engraver::stop_translation_timestep ()
97 context ()->get_score_context ()->set_property ("forbidBreak", SCM_BOOL_T);
104 Bar_engraver::acknowledge_end_spanner (Grob_info gi)
106 Grob *g = gi.grob ();
108 if (to_boolean (g->get_property ("to-barline")))
109 spanners_.push_back (dynamic_cast<Spanner *> (g));
114 Bar_engraver::boot ()
116 ADD_END_ACKNOWLEDGER (Bar_engraver, spanner);
119 ADD_TRANSLATOR (Bar_engraver,
121 "Create barlines. This engraver is controlled through the"
122 " @code{whichBar} property. If it has no bar line to create,"
123 " it will forbid a linebreak at this point. This engraver"
124 " is required to trigger the creation of clefs at the start"