-/*
+/*
scheme-engraver.hh -- declare Scheme_engraver
-
+
source file of the GNU LilyPond music typesetter
-
- Copyright (c) 2009--2010 Han-Wen Nienhuys <hanwen@lilypond.org>
+
+ Copyright (c) 2009--2015 Han-Wen Nienhuys <hanwen@lilypond.org>
LilyPond is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
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/>.
-
+ along with LilyPond. If not, see <http://www.gnu.org/licenses/>.
*/
#ifndef SCHEME_ENGRAVER_HH
#include "engraver.hh"
-class Scheme_engraver : public Engraver {
-public:
+class Scheme_engraver : public Engraver
+{
void init_from_scheme (SCM definition);
- TRANSLATOR_DECLARATIONS_NO_LISTENER (Scheme_engraver);
-
- static Listener get_listener (void *generic_arg, SCM event);
-
+public:
+ TRANSLATOR_FAMILY_DECLARATIONS (Scheme_engraver);
+ Scheme_engraver (SCM definition);
+
protected:
~Scheme_engraver ();
-
+
void stop_translation_timestep ();
void start_translation_timestep ();
void process_music ();
virtual void initialize ();
virtual void finalize ();
virtual void derived_mark () const;
- virtual translator_listener_record *get_listener_list () const;
+ virtual SCM get_listener_list () const;
virtual bool must_be_last () const;
private:
DECLARE_END_ACKNOWLEDGER (grob);
bool must_be_last_;
-
+
SCM acknowledge_grob_function_;
SCM stop_translation_timestep_function_;
SCM start_translation_timestep_function_;
// Alist of listened-symbol . scheme-function
SCM listeners_alist_;
- // We dont use this, but need it for the documentation boilerplate.
- static translator_listener_record *listener_list_;
- translator_listener_record *per_instance_listeners_;
+ SCM per_instance_listeners_;
};
#endif /* SCHEME_ENGRAVER_HH */