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

[lilypond.git] / lily / ottava-engraver.cc

diff --git a/lily/ottava-engraver.cc b/lily/ottava-engraver.cc
index 30fcbb75cb155e1ebd9eb9c52b648bc30e6b9fdb..76c65015976824d35cb17f6975245d5b446893ac 100644 (file)
--- a/lily/ottava-engraver.cc
+++ b/lily/ottava-engraver.cc
@@ -61,7 +61,7 @@ Ottava_spanner_engraver::process_music ()
          SCM c0 (get_property ("middleCPosition"));
          SCM oc0 (get_property ("originalCentralCPosition"));
          if (scm_less_p (oc0, c0) == SCM_BOOL_T)
-           span_->set_property ("direction", scm_int2num (DOWN));
+           span_->set_property ("direction", scm_from_int (DOWN));
        }
     }
   last_ottavation_ = ott;