]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/music-function-scheme.cc
Release: bump Welcome versions.
[lilypond.git] / lily / music-function-scheme.cc
index 016b96700d0fdfb71c19ba0b9ed944810baf31e6..5246b6dbe6282c3dc0e67e41c74611d3a49e9d5c 100644 (file)
@@ -4,18 +4,18 @@ LY_DEFINE (ly_music_function_extract, "ly:music-function-extract", 1, 0, 0,
            (SCM x),
            "Return the Scheme function inside@tie{}@var{x}.")
 {
-  LY_ASSERT_TYPE (Music_function::unsmob, x, 1);
+  LY_ASSERT_SMOB (Music_function, x, 1);
 
-  return Music_function::unsmob (x)->get_function ();
+  return unsmob<Music_function> (x)->get_function ();
 }
 
 LY_DEFINE (ly_music_function_signature, "ly:music-function-signature", 1, 0, 0,
            (SCM x),
            "Return the function signature inside@tie{}@var{x}.")
 {
-  LY_ASSERT_TYPE (Music_function::unsmob, x, 1);
+  LY_ASSERT_SMOB (Music_function, x, 1);
 
-  return Music_function::unsmob (x)->get_signature ();
+  return unsmob<Music_function> (x)->get_signature ();
 }
 
 LY_DEFINE (ly_make_music_function, "ly:make-music-function", 2, 0, 0,