X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Finclude%2Fcontext.hh;h=2cb0280ea128cb59076f7ce1d07463358fd007c2;hb=87eedcd59f4082cb0841528ad5bc82cb1d1191e3;hp=6be715ce3de1e037b306ca243b68da27e600146d;hpb=abbdb46061be5c0a0682059d1f86bf3e44ca5cf3;p=lilypond.git diff --git a/lily/include/context.hh b/lily/include/context.hh index 6be715ce3d..2cb0280ea1 100644 --- a/lily/include/context.hh +++ b/lily/include/context.hh @@ -3,25 +3,25 @@ source file of the GNU LilyPond music typesetter - (c) 2004--2006 Han-Wen Nienhuys + (c) 2004--2007 Han-Wen Nienhuys */ #ifndef CONTEXT_HH #define CONTEXT_HH -#include "context-key-manager.hh" -#include "lily-proto.hh" #include "listener.hh" #include "moment.hh" #include "std-vector.hh" #include "virtual-methods.hh" +#include "scm-hash.hh" +#include "lily-proto.hh" class Context { Scheme_hash_table *properties_dict () const; Context (Context const &src); - DECLARE_SMOBS (Context, dummy); + DECLARE_SMOBS (Context); DECLARE_CLASSNAME(Context); void terminate (); @@ -38,7 +38,6 @@ protected: SCM definition_; /* Additions to the Context_def, given by \with */ SCM definition_mods_; - Context_key_manager key_manager_; SCM properties_scm_; SCM context_list_; @@ -60,15 +59,11 @@ protected: friend class Context_def; // UGH! initialises implementation_ friend SCM ly_make_global_translator (SCM); - void clear_key_disambiguations (); DECLARE_LISTENER (set_property_from_event); DECLARE_LISTENER (unset_property_from_event); public: - Object_key const *get_grob_key (string name); - Object_key const *get_context_key (string name, string id); - string id_string () const { return id_string_; } SCM children_contexts () const { return context_list_; } SCM default_child_context_name () const; @@ -82,15 +77,20 @@ public: Translator_group *implementation () const { return implementation_; } Context *get_parent_context () const; - Context (Object_key const *); + Context (); /* properties: */ SCM internal_get_property (SCM name_sym) const; SCM properties_as_alist () const; - void internal_set_property (SCM var_sym, SCM value); Context *where_defined (SCM name_sym, SCM *value) const; void unset_property (SCM var_sym); +#ifndef NDEBUG + void internal_set_property (SCM var_sym, SCM value, char const *file, int line, char const *fun); +#else + void internal_set_property (SCM var_sym, SCM value); +#endif + Context *create_context (Context_def *, string, SCM); DECLARE_LISTENER (create_context_from_event); DECLARE_LISTENER (acknowledge_infant);