]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/music-function.cc
* lily/include/lily-guile.hh: rename ly_c_X_p -> ly_is_X
[lilypond.git] / lily / music-function.cc
index b1b3bba0bb2246e33e3a22745f98f89dfcb9a087..b784131650e3d5e96391ee232892dfa0a0b91989 100644 (file)
@@ -43,7 +43,7 @@ LY_DEFINE (ly_make_music_function, "ly:make-music-function", 2, 0, 0,
        str += "music";
       else if (scm_car (s) == ly_lily_module_constant ("markup?"))
        str += "markup";
-      else if (ly_c_procedure_p (scm_car (s)))
+      else if (ly_is_procedure (scm_car (s)))
        str += "scm";
     }
   if (str == "") str = "noarg";