From: fred <fred>
Date: Tue, 26 Mar 2002 23:26:07 +0000 (+0000)
Subject: lilypond-1.3.94
X-Git-Tag: release/1.5.59~1404
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=e0000b2ebf20d43ccb26ffafdd5fa36a7a2f8820;p=lilypond.git

lilypond-1.3.94
---

diff --git a/lily/dimension-cache.cc b/lily/dimension-cache.cc
index 96a51cde5a..da14511f52 100644
--- a/lily/dimension-cache.cc
+++ b/lily/dimension-cache.cc
@@ -15,9 +15,11 @@
 Dimension_cache::Dimension_cache (Dimension_cache const &d)
 {
   init();
-  extent_callback_l_ = d.extent_callback_l_;
+  dimension_ = d.dimension_;
+
   offset_ = d.offset_;
-  off_callbacks_ = d.off_callbacks_;
+  offset_callbacks_ = d.offset_callbacks_;
+  offsets_left_ = d.offsets_left_;
   parent_l_ = d.parent_l_;  
 }
 
@@ -29,13 +31,13 @@ Dimension_cache::Dimension_cache ()
 void
 Dimension_cache::init()
 {
-  extent_callback_l_ =0;
-  offset_ =0.0;
+  dimension_ = SCM_EOL;
+
+  offsets_left_ = 0;
+  offset_callbacks_ = SCM_EOL;
   offset_ =0.0;
   
-  dim_.set_empty ();
   parent_l_ =0;
-  valid_b_ = false;
 }
 
 
diff --git a/lily/include/dimension-cache.hh b/lily/include/dimension-cache.hh
index ca4fad3c16..5ae4845fd0 100644
--- a/lily/include/dimension-cache.hh
+++ b/lily/include/dimension-cache.hh
@@ -15,29 +15,35 @@
 #include "lily-proto.hh"
 #include "parray.hh"
 #include "dimension-cache-callback.hh"
+#include "lily-guile.hh"
 
 
 /**
-  Adminstration of offset dimension info. 
- */
+  Adminstration of offset dimension info.
+*/
 struct Dimension_cache
 {
-  bool valid_b_;
-  Interval dim_;
+  /*
+    Multi typed:
+
+     - cons: interval
+     - procedure: callback
+     - else: empty
+   */
+  SCM dimension_;
+
   /**
     The offset wrt. to the center of #parent_l_#
    */
 
   Real offset_;
-
-
+  SCM offset_callbacks_;
   
-  Array<Offset_callback> off_callbacks_;
+  char offsets_left_;
 
   /**
      What to call to find extent.  Nil means empty. 
    */
-  Dim_cache_callback extent_callback_l_;
   Score_element * parent_l_;
 
   Dimension_cache(Dimension_cache const&);