2003 -> 2004

[lilypond.git] / lily / grob.cc

diff --git a/lily/grob.cc b/lily/grob.cc
index 0e82fef4907b5c346811ffe248e8c5fc8d72fb4c..ff54ff54760f83829c5c41d450e641cf034bacf0 100644 (file)
--- a/lily/grob.cc
+++ b/lily/grob.cc
@@ -3,7 +3,7 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c)  1997--2003 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+  (c) 1997--2004 Han-Wen Nienhuys <hanwen@cs.uu.nl>
 */
 
 
@@ -125,7 +125,6 @@ Grob::Grob (Grob const&s)
   self_scm_ = SCM_EOL;
 
   immutable_property_alist_ = s.immutable_property_alist_;
-
   mutable_property_alist_ = SCM_EOL;
   
   /*
@@ -150,9 +149,6 @@ Grob::~Grob ()
 }
 
 
-
-
-
 MAKE_SCHEME_CALLBACK (Grob,molecule_extent,2);
 SCM
 Grob::molecule_extent (SCM element_smob, SCM scm_axis)
@@ -325,12 +321,16 @@ Grob::handle_broken_dependencies ()
 
   if (sp)
     {
+      /*
+       This is the original spanner. We use a special function
+       because some Spanners have enormously long lists in their
+       properties.
+       */
       for (SCM s = mutable_property_alist_; gh_pair_p(s);
           s = gh_cdr(s))
        {
          sp->substitute_one_mutable_property (gh_caar (s),
                                              gh_cdar (s));
-         
        }
     }
 
@@ -496,7 +496,7 @@ Grob::point_dimension_callback (SCM , SCM)
 }
 
 bool
-Grob::empty_b (Axis a)const
+Grob::is_empty (Axis a)const
 {
   return ! (gh_pair_p (dim_cache_[a].dimension_) ||
            gh_procedure_p (dim_cache_[a].dimension_));