]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/ambitus.cc
* lily/include/lily-guile.hh: is_x -> ly_c_X_p naming.
[lilypond.git] / lily / ambitus.cc
index b68b0721a3dc2ad90a04cd8a86e5e5c6d51953d9..30c1a9f281f1a69705b6771d1596daed6833e302 100644 (file)
@@ -149,7 +149,7 @@ Ambitus::print (SCM smob)
 
   SCM scm_note_head_style = me->get_property ("note-head-style");
   String note_head_style;
-  if (is_symbol (scm_note_head_style))
+  if (ly_c_symbol_p (scm_note_head_style))
     {
       String note_head_style =
        ly_symbol2string (scm_note_head_style);
@@ -244,7 +244,7 @@ Ambitus::print (SCM smob)
   SCM key_signature = me->get_property ("key-signature");
   SCM scm_accidentals_style = me->get_property ("accidentals-style");
   String accidentals_style;
-  if (is_symbol (scm_accidentals_style))
+  if (ly_c_symbol_p (scm_accidentals_style))
     {
       accidentals_style =
        ly_symbol2string (scm_accidentals_style);