Fix some bugs in the dynamic engraver and PostScript backend

[lilypond.git] / lily / spacing-spanner.cc

diff --git a/lily/spacing-spanner.cc b/lily/spacing-spanner.cc
index 9c48aaec0a0a384413db2d6e35ada1cd3af3e549..4c301b6a648ff2cd293e8237b201695863d669cc 100644 (file)
--- a/lily/spacing-spanner.cc
+++ b/lily/spacing-spanner.cc
@@ -56,20 +56,13 @@ MAKE_SCHEME_CALLBACK (Spacing_spanner, set_springs, 1);
 SCM
 Spacing_spanner::set_springs (SCM smob)
 {
-  Spanner *me = unsmob_spanner (smob);
+  Grob *me = unsmob_grob (smob);
 
   /*
     can't use get_system() ? --hwn.
   */
   vector<Grob*> all (get_root_system (me)->columns ());
-  vsize start = binary_search (all, (Grob*)me->get_bound (LEFT),
-                              &Paper_column::compare);
-  vsize end = binary_search (all, (Grob*) me->get_bound (RIGHT),
-                            &Paper_column::compare);
 
-  all = vector<Grob*>::vector<Grob*> (all.begin () + start,
-                                     all.begin () + end + 1);
-  
   set_explicit_neighbor_columns (all);
 
   Spacing_options options;
@@ -332,21 +325,8 @@ Spacing_spanner::musical_column_spacing (Grob *me,
 
       if (compound_note_space < 0 || wish_count == 0)
        {
-         /*
-           Fixed should be 0.0. If there are no spacing wishes, we're
-           likely dealing with polyphonic spacing of hemiolas.
-           
-           We used to have compound_fixed_note_space = options->increment_
-
-           but this can lead to numeric instability problems when we
-           do
-           
-              inverse_strength = (compound_note_space - compound_fixed_note_space)
-      
-         */
-         
          compound_note_space = base_note_space;
-         compound_fixed_note_space = 0.0;
+         compound_fixed_note_space = options->increment_;
        }
       else if (to_boolean (me->get_property ("average-spacing-wishes")))
        {
@@ -509,17 +489,15 @@ ADD_INTERFACE (Spacing_spanner, "spacing-spanner-interface",
               "head width) A 16th note is followed by 0.5 note head width. The\n"
               "quarter note is followed by  3 NHW, the half by 4 NHW, etc.\n",
 
-              
               "average-spacing-wishes "
-              "base-shortest-duration "
-              "common-shortest-duration "
               "grace-space-factor "
-              "packed-spacing "
-              "shortest-duration-space "
               "spacing-increment "
+              "base-shortest-duration "
               "strict-note-spacing "
+              "shortest-duration-space "
+              "common-shortest-duration "
               "uniform-stretching "
-              
+              "packed-spacing "
               );
 
 ADD_INTERFACE (Spacing_interface, "spacing-interface",