]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/rest.cc
* lily/include/lily-guile.hh: is_x -> ly_c_X_p naming.
[lilypond.git] / lily / rest.cc
index 18869230370a1e427e5531d60c2bcdf0c26de254..fc1f7e278276d556f809399bc5ea977f6c547fe1 100644 (file)
@@ -120,7 +120,7 @@ Rest::brew_internal_stencil (SCM smob)
   Grob* me = unsmob_grob (smob);
 
   SCM balltype_scm = me->get_property ("duration-log");
-  if (!is_number (balltype_scm))
+  if (!ly_c_number_p (balltype_scm))
     return Stencil ().smobbed_copy ();
 
   int balltype = ly_scm2int (balltype_scm);
@@ -161,7 +161,7 @@ SCM
 Rest::polyphonic_offset_callback (SCM smob, SCM)
 {
   Grob* me = unsmob_grob (smob);
-  if (is_number (me->get_property ("staff-position")))
+  if (ly_c_number_p (me->get_property ("staff-position")))
     return scm_make_real (0);
 
   Direction d = get_grob_direction (me);