* lily/include/lily-guile.hh: is_x -> ly_c_X_p naming.

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

diff --git a/lily/stem-tremolo.cc b/lily/stem-tremolo.cc
index 30580422f3a0b4bc13137e45379a0068520a160e..4ddd2b2db1a1c90137d791c3986e9d508706f398 100644 (file)
--- a/lily/stem-tremolo.cc
+++ b/lily/stem-tremolo.cc
@@ -92,7 +92,7 @@ Stem_tremolo::raw_stencil (Grob *me)
   
   int tremolo_flags = 0;
   SCM s = me->get_property ("flag-count");
-  if (is_number (s))
+  if (ly_c_number_p (s))
     tremolo_flags = ly_scm2int (s);
 
   if (!tremolo_flags)
@@ -150,7 +150,7 @@ Stem_tremolo::print (SCM grob)
 
   Real beamthickness = 0.0;
   SCM sbt = (beam) ? beam->get_property ("thickness") : SCM_EOL ;
-  if (is_number (sbt))
+  if (ly_c_number_p (sbt))
     {
       beamthickness = ly_scm2double (sbt) * ss;
     }