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

[lilypond.git] / lily / music-iterator.cc

diff --git a/lily/music-iterator.cc b/lily/music-iterator.cc
index d3bc1ec780efe82e0bbb70fe5decf0c09d825d51..c4cf900dca52d6ea51c5fc2f16bebbf7afae0fcd 100644 (file)
--- a/lily/music-iterator.cc
+++ b/lily/music-iterator.cc
@@ -78,7 +78,7 @@ Music_iterator::get_static_get_iterator (Music *m)
 
   SCM ctor = m->get_property ("iterator-ctor") ;
   SCM iter = SCM_EOL;
-  if (is_procedure (ctor))
+  if (ly_c_procedure_p (ctor))
     {
       iter = scm_call_0 (ctor);
       p = unsmob_iterator (iter);