* lily/output-def-scheme.cc: new file.

[lilypond.git] / lily / dynamic-performer.cc

diff --git a/lily/dynamic-performer.cc b/lily/dynamic-performer.cc
index 7f6008cb798ce54a4390fc7b8fbb48541493093a..f6885b554b94f63338043adb6d7f7d47f0093fbe 100644 (file)
--- a/lily/dynamic-performer.cc
+++ b/lily/dynamic-performer.cc
@@ -7,8 +7,6 @@
 */
 
 #include "performer.hh"
-
-#include "event.hh"
 #include "audio-item.hh"
 
 /*
@@ -59,12 +57,12 @@ Dynamic_performer::create_audio_elements ()
        */
       SCM min = get_property ("midiMinimumVolume");
       SCM max = get_property ("midiMaximumVolume");
-      if (ly_c_number_p (min) || ly_c_number_p (max))
+      if (scm_is_number (min) || scm_is_number (max))
        {
          Interval iv (0, 1);
-         if (ly_c_number_p (min))
+         if (scm_is_number (min))
            iv[MIN] = scm_to_double (min);
-         if (ly_c_number_p (max))
+         if (scm_is_number (max))
            iv[MAX] = scm_to_double (max);
          volume = iv[MIN] + iv.length () * volume;
        }
@@ -126,7 +124,7 @@ Dynamic_performer::try_music (Music* r)
   return false;
 }
 
-ENTER_DESCRIPTION (Dynamic_performer,
+ADD_TRANSLATOR (Dynamic_performer,
                  /*descr*/               "",
                  /* creats*/ "",
                  /* accepts */     "absolute-dynamic-event",