2 scheme-engraver.hh -- declare Scheme_engraver
4 source file of the GNU LilyPond music typesetter
6 Copyright (c) 2009--2011 Han-Wen Nienhuys <hanwen@lilypond.org>
8 LilyPond is free software: you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation, either version 3 of the License, or
11 (at your option) any later version.
13 LilyPond is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with LilyPond. If not, see <http://www.gnu.org/licenses/>.
23 #ifndef SCHEME_ENGRAVER_HH
24 #define SCHEME_ENGRAVER_HH
26 #include "engraver.hh"
28 class Scheme_engraver : public Engraver {
30 void init_from_scheme (SCM definition);
31 TRANSLATOR_DECLARATIONS_NO_LISTENER (Scheme_engraver);
33 static Listener get_listener (void *generic_arg, SCM event);
38 void stop_translation_timestep ();
39 void start_translation_timestep ();
40 void process_music ();
41 void process_acknowledged ();
43 virtual void initialize ();
44 virtual void finalize ();
45 virtual void derived_mark () const;
46 virtual translator_listener_record *get_listener_list () const;
47 virtual bool must_be_last () const;
50 void acknowledge_grob_by_hash (Grob_info info, SCM iface_function_hash);
51 void init_acknowledgers (SCM alist, SCM *hash);
53 DECLARE_ACKNOWLEDGER (grob);
54 DECLARE_END_ACKNOWLEDGER (grob);
58 SCM acknowledge_grob_function_;
59 SCM stop_translation_timestep_function_;
60 SCM start_translation_timestep_function_;
61 SCM process_music_function_;
62 SCM process_acknowledged_function_;
63 SCM initialize_function_;
64 SCM finalize_function_;
66 // hashq table of interface-symbol -> scheme-function
67 SCM interface_acknowledger_hash_;
68 SCM interface_end_acknowledger_hash_;
70 // Alist of listened-symbol . scheme-function
73 // We dont use this, but need it for the documentation boilerplate.
74 static translator_listener_record *listener_list_;
75 translator_listener_record *per_instance_listeners_;
78 #endif /* SCHEME_ENGRAVER_HH */