source file of the LilyPond music typesetter
- (c) 1996--2006 Han-Wen Nienhuys
+ (c) 1996--2009 Han-Wen Nienhuys
*/
#ifndef GROB_HH
#include "virtual-methods.hh"
#include "dimension-cache.hh"
#include "grob-interface.hh"
-#include "object-key.hh"
class Grob
{
Dimension_cache dim_cache_[NO_AXES];
Output_def *layout_;
Grob *original_;
- Object_key const *key_;
/* SCM data */
SCM immutable_property_alist_;
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 */
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 ();
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;
/* 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 */
Grob *get_parent (Axis a) const;
void fixup_refpoint ();
- virtual Interval_t<int> spanned_rank_iv ();
+ virtual Interval_t<int> spanned_rank_interval () const;
+ Stream_event *event_cause ();
};
/* smob utilities */
/* 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 */