X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Finclude%2Fgrob.hh;h=f8c8a04daeaff8ccbf2a03b230e1a8fdfb0513e1;hb=5b4b0d6e9a197e8f9eb085b7c2ad78b8be3e5cfc;hp=3a06afda205fe472ab318f3a7a7d8557e3fe2f03;hpb=2c8c61b3a5cddbb155786a1ca027528701c91ac9;p=lilypond.git diff --git a/lily/include/grob.hh b/lily/include/grob.hh index 3a06afda20..f8c8a04dae 100644 --- a/lily/include/grob.hh +++ b/lily/include/grob.hh @@ -3,7 +3,7 @@ source file of the LilyPond music typesetter - (c) 1996--2006 Han-Wen Nienhuys + (c) 1996--2008 Han-Wen Nienhuys */ #ifndef GROB_HH @@ -13,7 +13,6 @@ #include "virtual-methods.hh" #include "dimension-cache.hh" #include "grob-interface.hh" -#include "object-key.hh" class Grob { @@ -28,7 +27,6 @@ protected: Dimension_cache dim_cache_[NO_AXES]; Output_def *layout_; Grob *original_; - Object_key const *key_; /* SCM data */ SCM immutable_property_alist_; @@ -44,6 +42,9 @@ protected: void substitute_object_links (SCM, SCM); Real get_offset (Axis a) const; SCM try_callback (SCM, SCM); + SCM try_callback_on_alist (SCM *, SCM, SCM); + void internal_set_value_on_alist (SCM *alist, SCM sym, SCM val); + public: /* friends */ @@ -62,12 +63,11 @@ public: Output_def *layout () const { return layout_; } Grob *original () const { return original_; } SCM interfaces () const { return interfaces_; } - Object_key const *key () const { return key_; } /* life & death */ - Grob (SCM basic_props, Object_key const *); - Grob (Grob const &, int copy_count); - virtual Grob *clone (int count) const; + Grob (SCM basic_props); + Grob (Grob const &); + virtual Grob *clone () const; /* forced death */ void suicide (); @@ -80,15 +80,12 @@ public: SCM get_property_alist_chain (SCM) const; SCM internal_get_property (SCM symbol) const; SCM internal_get_property_data (SCM symbol) const; + SCM internal_get_non_callback_marker_property_data (SCM symbol) const; SCM internal_get_object (SCM symbol) const; void internal_set_object (SCM sym, SCM val); void internal_del_property (SCM symbol); - -#ifndef NDEBUG - void internal_set_property (SCM sym, SCM val, char const *file, int line, char const *fun); -#else + void instrumented_set_property (SCM, SCM, char const*, int, char const*); void internal_set_property (SCM sym, SCM val); -#endif /* messages */ void warning (string) const; @@ -121,7 +118,7 @@ public: /* extents */ Interval extent (Grob *refpoint, Axis) const; void flush_extent_cache (Axis); - Interval pure_height (Grob *refpoint, int start_col, int end_col); + virtual Interval pure_height (Grob *refpoint, int start_col, int end_col); Interval maybe_pure_extent (Grob *refpoint, Axis, bool pure, int start, int end); /* refpoints */ @@ -130,7 +127,7 @@ public: Grob *get_parent (Axis a) const; void fixup_refpoint (); - virtual Interval_t spanned_rank_iv (); + virtual Interval_t spanned_rank_interval () const; }; /* smob utilities */ @@ -149,9 +146,12 @@ Interval robust_relative_extent (Grob *, Grob *, Axis); /* offset/extent callbacks. */ void add_offset_callback (Grob *g, SCM proc, Axis a); void chain_offset_callback (Grob *g, SCM proc, Axis a); +void chain_callback (Grob *g, SCM proc, SCM sym); SCM axis_offset_symbol (Axis a); SCM axis_parent_positioning (Axis a); SCM call_pure_function (SCM unpure, SCM args, int start, int end); +void set_nested_property (Grob *, SCM property_path, SCM value); + #endif /* GROB_HH */