/*
- slash-repeat-engraver.cc -- implement Slash_repeat_engraver
+ This file is part of LilyPond, the GNU music typesetter.
- source file of the GNU LilyPond music typesetter
-
- (c) 2000--2009 Han-Wen Nienhuys <hanwen@xs4all.nl>, Erik Sandberg
+ Copyright (C) 2000--2012 Han-Wen Nienhuys <hanwen@xs4all.nl>, Erik Sandberg
<mandolaerik@gmail.com>
+
+ 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 <http://www.gnu.org/licenses/>.
*/
-#include "bar-line.hh"
-#include "global-context.hh"
-#include "international.hh"
#include "item.hh"
-#include "misc.hh"
-#include "repeated-music.hh"
-#include "score-engraver.hh"
-#include "spanner.hh"
+#include "engraver.hh"
#include "stream-event.hh"
-#include "warn.hh"
#include "translator.icc"
-/**
- This acknowledges repeated music with "percent" style. It typesets
- a slash sign.
+/*
+ This acknowledges repeated music with "percent" style. It typesets
+ a slash sign or double percent sign.
*/
class Slash_repeat_engraver : public Engraver
{
protected:
Stream_event *slash_;
protected:
- DECLARE_TRANSLATOR_LISTENER (percent);
+ DECLARE_TRANSLATOR_LISTENER (repeat_slash);
void process_music ();
};
slash_ = 0;
}
-IMPLEMENT_TRANSLATOR_LISTENER (Slash_repeat_engraver, percent);
+IMPLEMENT_TRANSLATOR_LISTENER (Slash_repeat_engraver, repeat_slash);
void
-Slash_repeat_engraver::listen_percent (Stream_event *ev)
+Slash_repeat_engraver::listen_repeat_slash (Stream_event *ev)
{
- /*todo: separate events for percent and slash */
- Moment meas_length
- = robust_scm2moment (get_property ("measureLength"), Moment (0));
-
- if (get_event_length (ev) < meas_length)
- ASSIGN_EVENT_ONCE (slash_, ev);
-
- /*
- don't warn if nothing happens: this can happen if there are whole
- measure repeats.
- */
+ ASSIGN_EVENT_ONCE (slash_, ev);
}
void
{
if (slash_)
{
- make_item ("RepeatSlash", slash_->self_scm ());
+ SCM count = slash_->get_property ("slash-count");
+ if (scm_to_int (count) == 0)
+ make_item ("DoubleRepeatSlash", slash_->self_scm ());
+ else
+ make_item ("RepeatSlash", slash_->self_scm ());
slash_ = 0;
}
}
ADD_TRANSLATOR (Slash_repeat_engraver,
- /* doc */
- "Make beat repeats.",
+ /* doc */
+ "Make beat repeats.",
- /* create */
- "RepeatSlash ",
+ /* create */
+ "DoubleRepeatSlash "
+ "RepeatSlash ",
- /* read */
- "measureLength ",
+ /* read */
+ "",
- /* write */
- ""
- );
+ /* write */
+ ""
+ );