/*
- 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--2014 Han-Wen Nienhuys <hanwen@xs4all.nl>
- (c) 1997--2003 Han-Wen Nienhuys <hanwen@cs.uu.nl>
-*/
+ 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 <http://www.gnu.org/licenses/>.
+*/
#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)
-
-class Scheme_hash_table;
+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 Translator_group
+{
+private:
+ void precompute_method_bindings ();
+ vector<Translator_method_binding>
+ precomputed_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 {
+ Translator_group_void_method
+ precomputed_self_method_bindings_[TRANSLATOR_METHOD_PRECOMPUTE_COUNT];
- Scheme_hash_table *properties_dict () const;
- int iterator_count_;
+ SCM protected_events_;
- friend class Interpretation_context_handle;
- SCM add_translator (SCM, Translator*);
+ DECLARE_LISTENER (create_child_translator);
-protected:
- ~Translator_group ();
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_;
-
- 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);
-
- /// Score_register = 0, Staff_registers = 1, etc)
- Translator_group* get_ancestor (int l=1);
- int get_depth () const;
- bool is_bottom_translator_b () const;
- bool removable_b () const;
- void terminate_translator (Translator*r);
- Translator *remove_translator (Translator*trans);
- void check_removal ();
- // Translator *get_simple_translator (String) const;
- Translator_group *find_existing_translator (String n, String id);
- Translator_group *find_create_translator (String n, String id);
- Link_array<Translator_group> path_to_acceptable_translator (String alias, Music_output_def*) const;
- Translator_group*get_default_interpreter ();
+ VIRTUAL_COPY_CONSTRUCTOR (Translator_group, Translator_group);
+ DECLARE_SMOBS (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
+
+
#endif // TRANSLATOR_GROUP_HH