* lily/music.cc (derived_mark): derive Music from Prob.

[lilypond.git] / lily / module-scheme.cc

diff --git a/lily/module-scheme.cc b/lily/module-scheme.cc
index 0e3d98c6123494fff3eb05b2b076b46ca0a9c107..c8a9002a638ed70b62003233477fc56cf00b9bf1 100644 (file)
--- a/lily/module-scheme.cc
+++ b/lily/module-scheme.cc
@@ -3,8 +3,7 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c) 2005 Han-Wen Nienhuys <hanwen@xs4all.nl>
-
+  (c) 2005--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
 */
 
 #include "lily-guile.hh"
@@ -12,6 +11,8 @@
 #include "main.hh"
 #include "string.hh"
 
+#include "ly-module.hh"
+
 /*
   If a variable in changed in SRC, we DEST doesn't see the
   definitions.
@@ -39,20 +40,18 @@ LY_DEFINE (ly_module_copy, "ly:module-copy",
   return SCM_UNSPECIFIED;
 }
 
-LY_DEFINE(ly_clear_anonymous_modules, "ly:clear-anonymous-modules",
-         0, 0, 0, (),
-         "Plug a GUILE 1.6 and 1.7 memory leak by breaking a weak reference "
-         "pointer cycle explicitly."
-         )
+LY_DEFINE (ly_clear_anonymous_modules, "ly:clear-anonymous-modules",
+          0, 0, 0, (),
+          "Plug a GUILE 1.6 and 1.7 memory leak by breaking a weak reference "
+          "pointer cycle explicitly.")
 {
 #ifdef MODULE_GC_KLUDGE
-  clear_anonymous_modules();
+  clear_anonymous_modules ();
 #endif
 
   return SCM_UNSPECIFIED;
 }
 
-
 /* Lookup SYM, but don't give error when it is not defined.  */
 SCM
 ly_module_lookup (SCM module, SCM sym)