*** empty log message ***

[lilypond.git] / lily / stem-tremolo.cc

diff --git a/lily/stem-tremolo.cc b/lily/stem-tremolo.cc
index 0a64888da40144deb80be724deb2dc883dc17c04..008bd90094d46c4e40ff3929ef7fecfb22249534 100644 (file)
--- a/lily/stem-tremolo.cc
+++ b/lily/stem-tremolo.cc
@@ -36,7 +36,7 @@ MAKE_SCHEME_CALLBACK (Stem_tremolo, height, 2);
 SCM
 Stem_tremolo::height (SCM smob, SCM ax)
 {
-  Axis a = (Axis)ly_scm2int (ax);
+  Axis a = (Axis)scm_to_int (ax);
   Grob *me = unsmob_grob (smob);
   assert (a == Y_AXIS);
 
@@ -83,7 +83,7 @@ Stem_tremolo::raw_stencil (Grob *me)
   int tremolo_flags = 0;
   SCM s = me->get_property ("flag-count");
   if (ly_c_number_p (s))
-    tremolo_flags = ly_scm2int (s);
+    tremolo_flags = scm_to_int (s);
 
   if (!tremolo_flags)
     {