]> git.donarmstrong.com Git - lilypond.git/commitdiff
*** empty log message ***
authorHan-Wen Nienhuys <hanwen@xs4all.nl>
Sun, 28 Sep 2003 20:46:01 +0000 (20:46 +0000)
committerHan-Wen Nienhuys <hanwen@xs4all.nl>
Sun, 28 Sep 2003 20:46:01 +0000 (20:46 +0000)
16 files changed:
ChangeLog
lily/ambitus-engraver.cc
lily/break-substitution.cc
lily/cluster.cc
lily/font-metric.cc
lily/input-file-results.cc
lily/lily-guile.cc
lily/molecule.cc
lily/moment.cc
lily/music-output-def.cc
lily/note-spacing.cc
lily/phrasing-slur-engraver.cc
lily/slur-engraver.cc
lily/spacing-spanner.cc
lily/system.cc
lily/text-spanner-engraver.cc

index b498fc0e596133d1697029a9894fc312513f165c..b6440f55d5a151f2c61de9705a58098bca103475 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,7 @@
 2003-09-28  Han-Wen Nienhuys  <hanwen@cs.uu.nl>
 
+       * lily/*.cc: remove #if 0'd code in couple of places.
+
        * lily/midi-stream.cc (operator <<): rewrite.
 
        * lily/note-head.cc (internal_brew_molecule): 
index a413742f5b17f16a729d6c3144af51d78cdd0caa..563d06e8dcbeb60770d0bc4d4b00dabc06e29eb0 100644 (file)
@@ -186,9 +186,6 @@ Ambitus_engraver::finalize ()
           * most probably arises from an empty voice, such as shared
           * global timesig/clef definitions.
           */
-#if 0
-         ambitus_->warning("empty ambitus range [ignored]");
-#endif
          ambitus_->suicide();
        }
     }
index fe3b1ea182cbbdc17c37604bb0d8cbbd2e530dc0..b97380ee7b561682346e343b4af081a350167b70 100644 (file)
@@ -396,25 +396,13 @@ Spanner::fast_fubstitute_grob_list (SCM sym,
        }
    }
 
-#if 0
-  qsort (vec + sp_index, len - sp_index,
-        sizeof (Substitution_entry), &Substitution_entry::spanner_compare);
  /*
-   This is a waste of time -- the staff-spanners screw up the
+   sorting vec[sp_index.. len]
+   is a waste of time -- the staff-spanners screw up the
    ordering, since they go across the entire score.
  */
- for (int i = sp_index; i < len ;i++)
-   {
-     
-     for (int j = vec[i].left_; j <= vec[i].right_; j++)
-       {
-        sp_indices[j - system_range[LEFT]].add_point (i);
-       }
-   }
-#else
  for (int i = sp_indices.size(); i--;)
    sp_indices[i]= Slice (sp_index, len-1);
-#endif
 
  
   assert (it_index <= sp_index);
index a6caf0a7d5b15fa9c91bd9156e2b9939b2af4b8a..c89b752fbe7347f0d512db4bf21a8be0dbd101ef 100644 (file)
 Molecule
 brew_cluster_piece (Grob *me, Array<Offset> bottom_points, Array<Offset> top_points)
 {
-#if 0
-  Real blotdiameter = me->get_paper ()->get_realvar (ly_symbol2scm ("blotdiameter"));
-#else
   Real blotdiameter = Staff_symbol_referencer::staff_space (me)/2;
-#endif
 
   Real padding;
   SCM padding_scm = me->get_grob_property ("padding");
index a8f81640a6e85f0e81f472436d597c63a5acbf10..90dcae5657067849c9ee8063c122ad0364ab01be 100644 (file)
@@ -155,15 +155,10 @@ LY_DEFINE(ly_find_glyph_by_name, "ly:find-glyph-by-name", 2 , 0, 0,
 
   Molecule m =  fm->find_by_name (ly_scm2string (name));
 
-#if 0
   /*
-    should add to calling interface.
+    TODO: make optional argument for default if not found.
+    
    */
-  if (m.get_expr () != SCM_EOL)
-    return m.smobbed_copy ();
-  else
-    return SCM_BOOL_F;
-#endif
   return m.smobbed_copy ();
 }
 
index 8239852e4b02ec52859edb863e817f9f8dcb824d..f92671aa6c6368fb9d47dbe413ae01533eb5ffa2 100644 (file)
@@ -88,12 +88,7 @@ write_dependency_file (String fn,
       String dep = deps[i];
       if (!dependency_prefix_global.empty_b ())
        {
-#if 0//thinko?
-         if (stat (dep.to_str0 (), &stat_buf) == -1 && errno == ENOENT)
-           ; //make emacs happy
-#else
          if (dep.index ('/') < 0)
-#endif
            dep = dependency_prefix_global + dep;
        }
       out  += " " +  dep;
index 9646364087cab8b71c95dbfe3a867a243de716c0..1b423bc7c870f37f675755533f9c53ca9568adb1 100644 (file)
@@ -561,6 +561,8 @@ type_check_assignment (SCM sym, SCM val,  SCM type_symbol)
 
     TODO: deprecate the use of \override and \revert for
     autoBeamSettings?
+
+    or use a symbol autoBeamSettingS?  
    */
   return true; 
 #endif
index e05e6432638557525241858b14bb5ad08f9e7d78..6e60f05660529dd355815cca12899cc74696b644 100644 (file)
@@ -173,11 +173,6 @@ int
 Molecule::print_smob (SCM , SCM port, scm_print_state *)
 {
   scm_puts ("#<Molecule ", port);
-#if 0
-  Molecule  *r = (Molecule *) ly_cdr (s);
-  String string (r->to_string ());
-  scm_puts ((char *)str.to_str0 (), port);
-#endif
   scm_puts (" >", port);
   
   return 1;
index 43c3e0bf1893dba18473af75a923061c8ac8c6e5..c23488e06856a4b82c3ce1a4920a09a58ca01047 100644 (file)
@@ -188,12 +188,6 @@ Moment::operator /= (Moment const &src)
 }
 
 
-#if 0
-Moment::operator Rational()
-{
-  return main_part_;
-}
-#endif
 
 int
 Moment::den () const { return main_part_.den (); }
index 8c353b6bc7e3991e66338390d31a44c1bce91752..1f834889f4a537ca6eabe3d44cd61d1f364f767e 100644 (file)
@@ -113,11 +113,7 @@ Music_output_def::print_smob (SCM s, SCM p, scm_print_state *)
 {
   Music_output_def * def = unsmob_music_output_def (s);
   scm_puts ("#<Music_output_def ", p);
-#if 0  
-  scm_write (def->type_name_, p);
-#else  
-  (void) def;
-#endif  
+  (void)def;
   scm_puts (">", p);
   return 1;
 }
index 80a789e418c499f90fa0afb03b5424946cd01e3a..de08af4efa24fd4d97f761159e1321bd4a3d4a8f 100644 (file)
@@ -431,11 +431,9 @@ Note_spacing::stem_dir_correction (Grob*me, Item * rcolumn,
 
   *space += correction;
 
-#if 0
   /* there used to be a correction for bar_xextent() here, but
      it's unclear what that was good for ?
   */
-#endif
 
 }
  
index 0906d168317e8d269694077040cbc923c9fa1251..5103df8203e80913e8205b525f1b12be53013b44 100644 (file)
@@ -107,14 +107,10 @@ Phrasing_slur_engraver::finalize ()
 {
   for (int i = 0; i < phrasing_slur_l_stack_.size (); i++)
     {
-#if 0
-      typeset_grob (phrasing_slur_l_stack_[i]);
-#else
       /*
        Let's not typeset unterminated stuff
       */
       phrasing_slur_l_stack_[i]->suicide ();
-#endif     
     }
   phrasing_slur_l_stack_.clear ();
 
index 77e6ccd1933f407c4ad5f95fcb5034c21938bf95..7441f52425278924fa1bbf4d0ef163ba1eba531e 100644 (file)
@@ -125,14 +125,10 @@ Slur_engraver::finalize ()
 {
   for (int i = 0; i < slur_stack_.size (); i++)
     {
-#if 0
-      typeset_grob (slur_stack_[i]);
-#else
       /*
        Let's not typeset unterminated stuff
        */
       slur_stack_[i]->suicide ();
-#endif     
     }
   slur_stack_.clear ();
 
index 83902679d2d19dfa25611759373f15d2b1c0fdd9..4e733fe639b4d4d2984e938e3a100de1de5db260 100644 (file)
@@ -826,9 +826,6 @@ Spacing_spanner::get_duration_space (Grob*me, Moment d, Rational shortest, bool
        */
       Rational ratio = d.main_part_ / shortest;
 
-#if 0
-      *expand_only = true;
-#endif
       return ((k-1) + double (ratio)) * incr;
     }
   else
index aae85ea286aa5c3586d99c33994300a76ad90ad8..8aadfedb6d73b325d52a80a76ac30666b99e3903 100644 (file)
@@ -201,31 +201,6 @@ set_loose_columns (System* which, Column_x_positions const *posns)
        }
       while (1);
       
-    
-#if 0
-      Real rx = right->relative_coordinate (right->get_parent (X_AXIS), X_AXIS);
-      Real lx = left->relative_coordinate (left->get_parent (X_AXIS), X_AXIS);
-
-      /*
-       divide space equally over loose columns.
-       */
-      int j = 1;
-      loose = col;
-      while (1)
-       {
-         SCM between = loose->get_grob_property ("between-cols");
-         if (!gh_pair_p (between))
-           break;
-
-         Paper_column *thiscol = dynamic_cast<Paper_column*> (loose);
-
-         thiscol->system_ = which;
-         thiscol->translate_axis (lx + j*(rx - lx)/divide_over, X_AXIS);
-
-         j ++; 
-         loose = dynamic_cast<Item*> (unsmob_grob (ly_cdr (between)));
-       }
-#else
       /*
        We divide the remaining space of the column over the left and
        right side. At the moment, we  
@@ -263,7 +238,6 @@ set_loose_columns (System* which, Column_x_positions const *posns)
 
       col->system_ = which;
       col->translate_axis (lx + dx - cval[LEFT], X_AXIS); 
-#endif
     }
 }
 
index 7fd070d831b7c89d44f42c85247288a98ce40022..bbd3ef376cd97db08a839562b47955be42fd3ccf 100644 (file)
@@ -99,12 +99,6 @@ Text_spanner_engraver::process_music ()
          current_req_ = req_drul_[START];
          span_  = new Spanner (get_property ("TextSpanner"));
 
-#if 0
-         /* Ugh.  Reset (de)cresc. specific properties */
-         span_->set_grob_property ("enclose-bounds", SCM_BOOL_T);
-         span_->set_grob_property ("if-text-padding", gh_double2scm (0));
-         span_->set_grob_property ("width-correct", gh_double2scm (0));
-#endif
          
          Side_position_interface::set_axis (span_, Y_AXIS);
          announce_grob (span_, req_drul_[START]->self_scm());