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

[lilypond.git] / lily / mark-engraver.cc

diff --git a/lily/mark-engraver.cc b/lily/mark-engraver.cc
index 18733b052704131d222173623231dcb8b94c48ed..a7e050d92ca093ed97e1afd2b03523fbb2031900 100644 (file)
--- a/lily/mark-engraver.cc
+++ b/lily/mark-engraver.cc
@@ -115,7 +115,7 @@ Mark_engraver::process_music ()
       if (!Text_item::markup_p (m) &&
          ly_c_procedure_p (proc))
        {
-         if (!is_number (m)) 
+         if (!ly_c_number_p (m)) 
            m =  get_property ("rehearsalMark");
 
          if (scm_integer_p (m) == SCM_BOOL_T
@@ -127,7 +127,7 @@ Mark_engraver::process_music ()
                                            scm_int2num (mark_count));
            }
 
-         if (is_number (m))
+         if (ly_c_number_p (m))
            m = scm_call_2 (proc, m, get_parent_context ()->self_scm ());
          else
            warning ("rehearsalMark does not have integer value.");