]> git.donarmstrong.com Git - lilypond.git/blob - lily/include/translator-group.hh
($(outdir)/%.pdf): add DVIPS_FLAGS. This will
[lilypond.git] / lily / include / translator-group.hh
1 /*
2   translator-group.hh -- declare Translator_group
3
4   source file of the GNU LilyPond music typesetter
5
6   (c) 1997--2004 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7 */
8
9
10 #ifndef TRANSLATOR_GROUP_HH
11 #define TRANSLATOR_GROUP_HH
12
13 #include "string.hh"
14 #include "lily-proto.hh"
15 #include "virtual-methods.hh"
16 #include "translator.hh"
17 #include "parray.hh"
18 #include "smobs.hh"
19
20 // egcs
21 typedef void (Translator::*Method_pointer) (void);
22 #define set_property(x,y) internal_set_property(ly_symbol2scm(x),y)
23
24 class Scheme_hash_table;
25
26
27 /** Make some kind of Elements from Events. Elements are made by
28   hierarchically grouped Translators
29   */
30 class Translator_group : public virtual Translator {
31 public:
32   String id_string_;
33 private:
34   int iterator_count_;
35   friend class Interpretation_context_handle;
36
37   Scheme_hash_table *properties_dict () const;
38   SCM add_translator (SCM, Translator*);
39 protected:
40   ~Translator_group ();
41
42   virtual SCM get_simple_trans_list ();
43
44 public:
45   void execute_pushpop_property (SCM prop, SCM sym, SCM val);
46   SCM internal_get_property (SCM name_sym) const;
47   SCM properties_as_alist () const;
48   void unset_property (SCM var_sym);
49   void internal_set_property (SCM var_sym, SCM value);  
50
51   Translator_group *where_defined (SCM name_sym) const;
52   String context_name () const;  
53   Translator_group (Translator_group const &);
54   Translator_group ();
55
56   bool is_alias (SCM) const;
57   void add_fresh_group_translator (Translator *trans);
58   void add_used_group_translator (Translator *trans);
59   bool is_bottom_context () const;
60   bool is_removable () const;
61   void terminate_translator (Translator*r);
62   Translator *remove_translator (Translator*trans);
63   void check_removal ();
64   Translator_group *find_existing_translator (SCM context_name, String id);
65   Translator_group *find_create_translator (SCM context_name,
66                                             String id, SCM ops);
67   Link_array<Translator_group>
68     path_to_acceptable_translator (SCM alias,
69                                    Music_output_def*) const;
70   Translator_group*get_default_interpreter ();
71   VIRTUAL_COPY_CONS (Translator);
72 public:
73   bool try_music_on_nongroup_children (Music *m);
74   
75   virtual void do_announces ();
76   virtual bool try_music (Music* req);       
77   virtual void stop_translation_timestep ();
78   virtual void start_translation_timestep ();   
79   virtual void initialize ();
80   virtual void finalize ();
81   virtual void each (Method_pointer);
82 };
83
84
85 bool melisma_busy (Translator* tr); // where to put this? --hwn
86 void apply_property_operations (Translator_group*tg, SCM pre_init_ops);
87 SCM names_to_translators (SCM namelist, Translator_group*tg);
88 void execute_pushpop_property (Translator_group * trg,
89                                SCM prop, SCM eltprop, SCM val);
90 SCM updated_grob_properties (Translator_group* tg, SCM sym);
91
92 #endif // TRANSLATOR_GROUP_HH