X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fdynamic-performer.cc;h=257708de292fabf63f9b4b7b9eb8a16a5f1b56fb;hb=3c9561d788078f7ee4a6e1d973cf549d8f258935;hp=53e8a5e0d4392475d8a26eb9c49b0a4dbe4da1d7;hpb=e7020dbb36a9e9c10bda48e5197213e8a3bacef6;p=lilypond.git

diff --git a/lily/dynamic-performer.cc b/lily/dynamic-performer.cc
index 53e8a5e0d4..257708de29 100644
--- a/lily/dynamic-performer.cc
+++ b/lily/dynamic-performer.cc
@@ -59,12 +59,12 @@ Dynamic_performer::create_audio_elements ()
        */
       SCM min = get_property ("midiMinimumVolume");
       SCM max = get_property ("midiMaximumVolume");
-      if (is_number (min) || is_number (max))
+      if (ly_c_number_p (min) || ly_c_number_p (max))
 	{
 	  Interval iv (0, 1);
-	  if (is_number (min))
+	  if (ly_c_number_p (min))
 	    iv[MIN] = ly_scm2double (min);
-	  if (is_number (max))
+	  if (ly_c_number_p (max))
 	    iv[MAX] = ly_scm2double (max);
 	  volume = iv[MIN] + iv.length () * volume;
 	}