release: 1.3.50

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

diff --git a/lily/property-inspect.cc b/lily/property-inspect.cc
index 5e29f4160b094c8e262ea205cb960ea5ea7bb01e..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 (SCM_NUMBERP (s))
-    {
-      int i = gh_int2scm (s);
-      return i>= -1 && i <= 1; 
-    }
-  return false;
-}
-
-Direction
-to_dir (SCM s)
-{
-  return (Direction) gh_scm2int (s);
-}