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

[lilypond.git] / lily / pitched-trill-engraver.cc

diff --git a/lily/pitched-trill-engraver.cc b/lily/pitched-trill-engraver.cc
index 27b66f0ce799e1425107e2150f941659c5a460d0..6d98ede4d770d21de923b326d48749e14c694906 100644 (file)
--- a/lily/pitched-trill-engraver.cc
+++ b/lily/pitched-trill-engraver.cc
@@ -83,8 +83,8 @@ Pitched_trill_engraver::make_trill (Music *mus)
 
   SCM keysig = get_property ("localKeySignature");
 
-  SCM key = scm_cons (scm_int2num (p->get_octave ()),
-                     scm_int2num (p->get_notename ()));
+  SCM key = scm_cons (scm_from_int (p->get_octave ()),
+                     scm_from_int (p->get_notename ()));
 
   SCM handle = scm_assoc (key, keysig);
   bool print_acc =