lily/include/translator-def.hh

   1 /*
   2   translator-def.hh -- declare Translator_def
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 2000--2001 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   7
   8  */
   9
  10 #ifndef TRANSLATOR_DEF_HH
  11 #define TRANSLATOR_DEF_HH
  12
  13 #include "lily-proto.hh"
  14 #include "smobs.hh"
  15 #include "input.hh"
  16
  17 /*
  18   The definition of a interpretation context as given in the
  19   input. The lists are stored in order of definition.
  20 */
  21 struct Translator_def : public Input
  22 {
  23 private:
  24   /*
  25     these lists store the definition, in opposite order of entry
  26   */
  27
  28   SCM consists_name_list_;
  29   SCM end_consists_name_list_;
  30   SCM accepts_name_list_;
  31   SCM property_ops_;
  32 public:
  33   SCM type_name_;
  34   SCM type_aliases_;
  35   SCM translator_group_type_;
  36
  37   SCM modify_definition (SCM, SCM, bool);
  38   SCM default_child_context_name ();
  39
  40   void set_acceptor (SCM accepts, bool add);
  41   void add_element (SCM name);
  42   void remove_element (SCM name);
  43   void add_last_element (SCM name);
  44
  45   void add_push_property (SCM,SCM,SCM);
  46   void add_pop_property (SCM,SCM);
  47   void add_property_assign (SCM, SCM);
  48   Link_array<Translator_def> path_to_acceptable_translator (SCM type_str, Music_output_def* odef) const;
  49   Translator_group * instantiate (Music_output_def*);
  50
  51   SCM to_alist () const;
  52
  53   static SCM make_scm () ;
  54   static void apply_pushpop_property (Translator_group*, SCM syms, SCM eprop, SCM val);
  55
  56   SCM clone_scm ()const;
  57   void apply_property_operations (Translator_group*);
  58
  59 private:
  60   DECLARE_SMOBS (Translator_def,foo);
  61   Translator_def ();
  62   Translator_def (Translator_def const&);
  63
  64
  65 };
  66
  67 DECLARE_UNSMOB(Translator_def,translator_def);
  68
  69
  70 #endif /* TRANSLATOR_DEF_HH */
  71