void stop_translation_timestep ();
void process_music ();
virtual void finalize ();
- virtual void derived_mark () const;
DECLARE_TRANSLATOR_LISTENER (note);
DECLARE_TRANSLATOR_LISTENER (rest);
private:
Item *chord_name_;
vector<Stream_event *> notes_;
- SCM last_chord_;
Stream_event *rest_event_;
};
{
}
-void
-Chord_name_engraver::derived_mark () const
-{
- scm_gc_mark (last_chord_);
-}
-
Chord_name_engraver::Chord_name_engraver ()
{
chord_name_ = 0;
- last_chord_ = SCM_EOL;
rest_event_ = 0;
}
markup = maybe_markup;
SCM chord_changes = get_property ("chordChanges");
- if (to_boolean (chord_changes) && scm_is_pair (last_chord_)
- && ly_is_equal (markup, last_chord_))
+ SCM last_chord = get_property ("lastChord");
+ if (to_boolean (chord_changes) && scm_is_pair (last_chord)
+ && ly_is_equal (markup, last_chord))
chord_name_->set_property ("begin-of-line-visible", SCM_BOOL_T);
- last_chord_ = markup;
+ context ()->set_property ("lastChord", markup);
}
IMPLEMENT_TRANSLATOR_LISTENER (Chord_name_engraver, note);
"chordNoteNamer "
"chordRootNamer "
"chordNameExceptions "
+ "lastChord "
"majorSevenSymbol "
"noChordSymbol ",
/* write */
- ""
+ "lastChord "
);