lilypond-1.3.125

diff --git a/lily/auto-change-music.cc b/lily/auto-change-music.cc
deleted file mode 100644 (file)
index 5af0524..0000000
--- a/lily/auto-change-music.cc
+++ /dev/null
@@ -1,18 +0,0 @@
-/*   
-  auto-switch-music.cc --  implement Auto_change_music
-  
-  source file of the GNU LilyPond music typesetter
-  
-  (c) 1999--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
-  
- */
-
-#include "auto-change-music.hh"
-#include "auto-change-iterator.hh"
-
-Auto_change_music::Auto_change_music (SCM m)
-  : Music_wrapper (m)
-{
-  set_mus_property ("iterator-ctor", Auto_change_iterator::constructor_cxx_function);
-
-}

diff --git a/lily/cross-staff.cc b/lily/cross-staff.cc
deleted file mode 100644 (file)
index 4bb5e0d..0000000
--- a/lily/cross-staff.cc
+++ /dev/null
@@ -1,51 +0,0 @@
-#include "cross-staff.hh"
-#include "item.hh"
-#include "align-interface.hh"
-#include "spanner.hh"
-#include "warn.hh"
-#include "paper-def.hh"
-
-
-/*
-  JUNKME
- */
-Real
-calc_interstaff_dist (Item  *item, Spanner  *span)
-{
-  Real interstaff = 0.0; 
-  Grob *common = item->common_refpoint (span, Y_AXIS);
-
-
-  if (Align_interface::has_interface (common) && Align_interface::axis(common) == Y_AXIS)
-    {
-      SCM threshold = common->get_grob_property ("forced-distance");
-      interstaff = 1.0;
-      if (!gh_number_p (threshold))
-       warning (_ ("not a forced distance; cross-staff spanners may be broken"));
-      else
-       interstaff *= gh_scm2double (threshold);
-
-      Grob  * span_refpoint = span;
-      while (span_refpoint->parent_l  (Y_AXIS) != common)
-       span_refpoint = span_refpoint->parent_l (Y_AXIS);
-
-      Grob  * note_refpoint = item;
-      while (note_refpoint->parent_l (Y_AXIS) != common)
-       note_refpoint = note_refpoint->parent_l (Y_AXIS);
-
-      int span_prio =
-       Align_interface::get_count (common,(Grob*) dynamic_cast<Grob *> (span_refpoint));
-      int item_prio =
-       Align_interface::get_count (common,(Grob*) dynamic_cast<Grob   *> (note_refpoint));
-
-      /*
-       our staff is lower -> interstaff *= -1
-       */
-
-      if (span_prio < item_prio)
-       interstaff *= -1;
-      return interstaff;
-    }
-  else return 0.0;
-}
-

diff --git a/lily/include/cross-staff.hh b/lily/include/cross-staff.hh
deleted file mode 100644 (file)
index c518600..0000000
--- a/lily/include/cross-staff.hh
+++ /dev/null
@@ -1,17 +0,0 @@
-/*   
-  cross-staff.hh -- declare cross staff calc funcs.
-  
-  source file of the GNU LilyPond music typesetter
-  
-  (c) 1999--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
-  
- */
-
-#ifndef CROSS_STAFF_HH
-#define CROSS_STAFF_HH
-#include "lily-proto.hh"
-Real
-calc_interstaff_dist (Item  *item, Spanner  *span);
-
-#endif /* CROSS_STAFF_HH */
-