X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Finclude%2Ftranslator-group.hh;h=c45e29de0ac2b989a80d7c0eadc726d57362f2a7;hb=47db9a3883d726ca53e2133a3b2298f78dd6a32e;hp=4867c62a2b19c22be49d6ad9bb2156d5ce7d7937;hpb=b5b00b10f242e4d22e352c8a0d61c384bf205277;p=lilypond.git diff --git a/lily/include/translator-group.hh b/lily/include/translator-group.hh index 4867c62a2b..c45e29de0a 100644 --- a/lily/include/translator-group.hh +++ b/lily/include/translator-group.hh @@ -1,88 +1,109 @@ /* - translator-group.hh -- declare Translator_group + This file is part of LilyPond, the GNU music typesetter. - source file of the GNU LilyPond music typesetter + Copyright (C) 1997--2015 Han-Wen Nienhuys - (c) 1997--2003 Han-Wen Nienhuys -*/ + 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 . +*/ #ifndef TRANSLATOR_GROUP_HH #define TRANSLATOR_GROUP_HH -#include "string.hh" -#include "lily-proto.hh" -#include "virtual-methods.hh" +#include "listener.hh" #include "translator.hh" -#include "parray.hh" -#include "smobs.hh" -// egcs -typedef void (Translator::*Method_pointer) (void); -#define set_property(x,y) internal_set_property(ly_symbol2scm(x),y) +typedef void (Translator:: *Translator_method) (void); +typedef void (Translator_group:: *Translator_group_method) (void); +typedef void (*Translator_group_void_method) (Translator_group *); + +struct Translator_method_binding +{ + Translator *translator_; + Translator_void_method_ptr method_; + + Translator_method_binding () + { + } + Translator_method_binding (Translator *tr, Translator_void_method_ptr ptr) + { + translator_ = tr; + method_ = ptr; + } + void invoke () + { + if (method_) + (translator_->*method_) (); + } +}; -class Scheme_hash_table; +class Translator_group : public Smob +{ +public: + SCM mark_smob (); + int print_smob (SCM, scm_print_state *); + static const char type_p_name_[]; + virtual ~Translator_group (); +private: + void precompute_method_bindings (); + vector + precomputed_method_bindings_[TRANSLATOR_METHOD_PRECOMPUTE_COUNT]; + Translator_group_void_method + precomputed_self_method_bindings_[TRANSLATOR_METHOD_PRECOMPUTE_COUNT]; -/** Make some kind of Elements from Events. Elements are made by - hierarchically grouped Translators - */ -class Translator_group : public virtual Translator { + SCM protected_events_; - Scheme_hash_table *properties_dict () const; - int iterator_count_; + DECLARE_LISTENER (create_child_translator); - friend class Interpretation_context_handle; - SCM add_translator (SCM, Translator*); - -protected: - ~Translator_group (); - - virtual SCM get_simple_trans_list (); public: - void execute_pushpop_property (SCM prop, SCM sym, SCM val); - SCM internal_get_property (SCM name_sym) const; - SCM properties_as_alist () const; - - void unset_property (SCM var_sym); - void internal_set_property (SCM var_sym, SCM value); - Translator_group *where_defined (SCM name_sym) const; - - String id_string_; - String context_name () const; - VIRTUAL_COPY_CONS (Translator); - Translator_group (Translator_group const &); - Translator_group (); - void add_fresh_group_translator (Translator *trans); - void add_used_group_translator (Translator *trans); - - int get_depth () const; - bool is_bottom_context () const; - bool is_removable () const; - void terminate_translator (Translator*r); - Translator *remove_translator (Translator*trans); - void check_removal (); - Translator_group *find_existing_translator (SCM context_name, String id); - Translator_group *find_create_translator (SCM context_name, String id, SCM ops); - Link_array path_to_acceptable_translator (SCM alias, - Music_output_def*) const; - Translator_group*get_default_interpreter (); + DECLARE_CLASSNAME (Translator_group); -public: - bool try_music_on_nongroup_children (Music *m); - - virtual void do_announces (); - virtual bool try_music (Music* req); - virtual void stop_translation_timestep (); - virtual void start_translation_timestep (); + virtual void connect_to_context (Context *c); + virtual void disconnect_from_context (); + virtual SCM get_simple_trans_list (); virtual void initialize (); virtual void finalize (); - virtual void each (Method_pointer); + + void protect_event (SCM ev); + + void stop_translation_timestep (); + void start_translation_timestep (); + + virtual void fetch_precomputable_methods (Translator_group_void_method[]); + + Translator_group (); + + void precomputed_translator_foreach (Translator_precompute_index); + void call_precomputed_self_method (Translator_precompute_index); + + Context *context () const { return context_; } +protected: + SCM simple_trans_list_; + Context *context_; + + friend class Context_def; + virtual void derived_mark () const; }; +SCM names_to_translators (SCM namelist, Context *tg); +void recurse_over_translators (Context *c, Translator_method ptr, + Translator_group_method ptr2, Direction); +void precomputed_recurse_over_translators (Context *c, Translator_precompute_index idx, Direction dir); +Translator_group *get_translator_group (SCM sym); + +#define foobar +#define ADD_TRANSLATOR_GROUP(classname, desc, grobs, read, write) foobar -bool melisma_busy (Translator* tr); // where to put this? --hwn -void apply_property_operations (Translator_group*tg, SCM pre_init_ops); -SCM names_to_translators (SCM namelist, Translator_group*tg); #endif // TRANSLATOR_GROUP_HH