* lily/object-key-dumper-scheme.cc: new file.

[lilypond.git] / lily / include / context.hh

diff --git a/lily/include/context.hh b/lily/include/context.hh
index b9d08f196984bb07fc0f6cee94468125bf089f9f..060fe9c22f1307fbea1d0e98a5ebbfe0a865da6a 100644 (file)
--- a/lily/include/context.hh
+++ b/lily/include/context.hh
@@ -1,14 +1,16 @@
-/*   
-     context.hh -- declare  Context
-
-     source file of the GNU LilyPond music typesetter
-
-     (c) 2004 Han-Wen Nienhuys <hanwen@xs4all.nl>
- */
+/*
+  context.hh -- declare  Context
+  
+  source file of the GNU LilyPond music typesetter
+  
+  (c) 2004 Han-Wen Nienhuys <hanwen@xs4all.nl>
+*/
 
 #ifndef CONTEXT_HH
 #define CONTEXT_HH
 
+#include <map>
+
 #include "moment.hh"
 #include "lily-proto.hh"
 
@@ -21,71 +23,94 @@ class Context
   DECLARE_SMOBS (Context, dummy);
 
   void terminate ();
-public:
+
+private:
+  friend class Interpretation_context_handle;
+  int iterator_count_;
+  bool init_;
+
+  std::map<String, int> grob_counts_;
+  std::map<String, int> context_counts_;
+
+protected:
+  Object_key const * key_;
+  Context * daddy_context_;
   SCM definition_;
   SCM properties_scm_;
   SCM context_list_;
   SCM accepts_list_;
   SCM aliases_;
+  SCM implementation_;
+  String id_string_;
 
-  Context * daddy_context_;
+  friend class Context_def;
+  void clear_key_disambiguations ();
+
+public:
+  Object_key const *get_key () const;
+  Object_key const *get_grob_key (String);
+  Object_key const *get_context_key (String, String);
+
+  Context *create_context (Context_def*, String, SCM); 
+  String id_string () const { return id_string_; } 
+  SCM children_contexts () const { return context_list_; }
+  SCM default_child_context_name () const;
+
+  Translator_group* implementation () const;
+  Context *get_parent_context () const;
+  Context (Object_key const*);
   
-  Context ();
+  /* properties:  */
   void execute_pushpop_property (SCM prop, SCM sym, SCM val);
   SCM internal_get_property (SCM name_sym) const;
-
-  Context *remove_context (Context*trans);
-  void check_removal ();
-
   SCM properties_as_alist () const;
-  void unset_property (SCM var_sym);
   void internal_set_property (SCM var_sym, SCM value);  
-
   Context *where_defined (SCM name_sym) const;
+  void unset_property (SCM var_sym);
+
+  
+  Context *remove_context (Context *trans);
+  void check_removal ();
   String context_name () const;
-  Global_context * get_global_context () const;
+  SCM context_name_symbol () const;
+  Global_context *get_global_context () const;
   
   virtual Score_context * get_score_context () const;  
+  virtual Output_def *get_output_def () const;
+  virtual Moment now_mom () const;
+  virtual Context *get_default_interpreter ();
+
   bool is_alias (SCM) const;
   void add_alias (SCM); 
   void add_context (Context *trans);
   bool is_bottom_context () const;
   bool is_removable () const;
   bool try_music (Music *);
-  
-  virtual Music_output_def *get_output_def () const;
-  virtual Moment now_mom () const;
-  Context *find_existing_context (SCM context_name, String id);
+
   Context *find_create_context (SCM context_name,
-                                           String id, SCM ops);
+                               String id, SCM ops);
+  Context *create_unique_context (SCM context_name,
+                                  SCM ops);
   Link_array<Context> path_to_acceptable_context (SCM alias,
-                                                 Music_output_def*) const;
-  Context *get_default_interpreter ();
-  String id_string_;
+                                                 Output_def*) const;
 
-  SCM implementation_;
-private:
-  friend class Interpretation_context_handle;
-  int iterator_count_;
-  bool init_;
 };
 
 /*
   Context arg? 
  */
 
-void apply_property_operations (Context*tg, SCM pre_init_ops);
-void execute_pushpop_property (Context * trg, SCM prop, SCM eltprop, SCM val);
-SCM updated_grob_properties (Context* tg, SCM sym);
-Context * find_context_below (Context * where,
-                   String type, String id);
-bool melisma_busy (Context*);
+void apply_property_operations (Context *tg, SCM pre_init_ops);
+void execute_pushpop_property (Context *trg, SCM prop, SCM eltprop, SCM val);
+SCM updated_grob_properties (Context *tg, SCM sym);
+Context *find_context_below (Context *where,
+                             SCM type_sym, String id);
+bool melisma_busy (Context *);
 
 Context *get_voice_to_lyrics (Context *lyrics);
-Grob *get_current_note_head (Context * voice);
-Context *unsmob_context (SCM);
-
-DECLARE_UNSMOB(Context,context);
+Grob *get_current_note_head (Context *voice);
+Grob *get_current_rest (Context *voice);
+DECLARE_UNSMOB(Context, context);
 
 #endif /* CONTEXT_HH */