* lily/main.cc (setup_guile_env): new function. Set GC min_yields

[lilypond.git] / lily / align-interface.cc

diff --git a/lily/align-interface.cc b/lily/align-interface.cc
index ba4322d8bb0b906fb89aed10562cf6b9adfb6a64..2f9a52aae9bbd23127d5fae5ff03e9ed02f31794 100644 (file)
--- a/lily/align-interface.cc
+++ b/lily/align-interface.cc
@@ -26,7 +26,7 @@ Align_interface::alignment_callback (SCM element_smob, SCM axis)
     {
       Align_interface::align_elements_to_extents (par, ax);
     }
-  return scm_make_real (0.0);
+  return scm_from_double (0.0);
 }
 
 MAKE_SCHEME_CALLBACK (Align_interface, fixed_distance_alignment_callback, 2);
@@ -40,7 +40,7 @@ Align_interface::fixed_distance_alignment_callback (SCM element_smob, SCM axis)
     {
       Align_interface::align_to_fixed_distance (par, ax);
     }
-  return scm_make_real (0.0);
+  return scm_from_double (0.0);
 }
 
 /*