/*
This file is part of LilyPond, the GNU music typesetter.
- Copyright (C) 2000--2011 Han-Wen Nienhuys <hanwen@xs4all.nl>, Erik Sandberg
+ Copyright (C) 2000--2015 Han-Wen Nienhuys <hanwen@xs4all.nl>, Erik Sandberg
<mandolaerik@gmail.com>
LilyPond is free software: you can redistribute it and/or modify
protected:
Stream_event *slash_;
protected:
- DECLARE_TRANSLATOR_LISTENER (repeat_slash);
+ void listen_repeat_slash (Stream_event *);
void process_music ();
};
slash_ = 0;
}
-IMPLEMENT_TRANSLATOR_LISTENER (Slash_repeat_engraver, repeat_slash);
void
Slash_repeat_engraver::listen_repeat_slash (Stream_event *ev)
{
- ASSIGN_EVENT_ONCE (slash_, ev);
+ ASSIGN_EVENT_ONCE (slash_, ev);
}
void
{
SCM count = slash_->get_property ("slash-count");
if (scm_to_int (count) == 0)
- make_item ("DoubleRepeatSlash", slash_->self_scm ());
+ make_item ("DoubleRepeatSlash", slash_->self_scm ());
else
- make_item ("RepeatSlash", slash_->self_scm ());
+ make_item ("RepeatSlash", slash_->self_scm ());
slash_ = 0;
}
}
+void
+Slash_repeat_engraver::boot ()
+{
+ ADD_LISTENER (Slash_repeat_engraver, repeat_slash);
+}
+
ADD_TRANSLATOR (Slash_repeat_engraver,
- /* doc */
- "Make beat repeats.",
+ /* doc */
+ "Make beat repeats.",
- /* create */
- "DoubleRepeatSlash "
- "RepeatSlash ",
+ /* create */
+ "DoubleRepeatSlash "
+ "RepeatSlash ",
- /* read */
- "",
+ /* read */
+ "",
- /* write */
- ""
- );
+ /* write */
+ ""
+ );