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

[lilypond.git] / lily / easy-notation.cc

diff --git a/lily/easy-notation.cc b/lily/easy-notation.cc
index 6311e8a07522e3ac47223839e841fd8541773f5a..00e93f190527bcf208b54b0f3892bfdfaac1a5d9 100644 (file)
--- a/lily/easy-notation.cc
+++ b/lily/easy-notation.cc
@@ -30,7 +30,7 @@ Note_head::brew_ez_stencil (SCM smob)
   SCM spitch = unsmob_music (cause)->get_property ("pitch");
   Pitch *pit = unsmob_pitch (spitch);
 
-  SCM idx = scm_int2num (pit->get_notename ());
+  SCM idx = scm_from_int (pit->get_notename ());
   SCM names = me->get_property ("note-names");
   SCM charstr = SCM_EOL;
   if (scm_is_vector (names))