patch::: 1.3.58.jcn2

[lilypond.git] / lily / property-inspect.cc

diff --git a/lily/property-inspect.cc b/lily/property-inspect.cc
index af4e5a607d94a6c1ac6033e51c38d06163c28000..2ea72823858413cf375fa21b4877f0aad32ef3c6 100644 (file)
--- a/lily/property-inspect.cc
+++ b/lily/property-inspect.cc
@@ -3,25 +3,7 @@
   
   source file of the GNU LilyPond music typesetter
   
-  (c) 1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+  (c) 1999--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   
  */
 
-#include "property-inspect.hh"
-
-bool
-isdir_b (SCM s)
-{
-  if (gh_number_p (s))
-    {
-      int i = gh_scm2int (s);
-      return i>= -1 && i <= 1; 
-    }
-  return false;
-}
-
-Direction
-to_dir (SCM s)
-{
-  return (Direction) gh_scm2int (s);
-}