new file: perform drum notes.

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

diff --git a/lily/note-performer.cc b/lily/note-performer.cc
index 02b0baceff030583b02c4be3a657e4ee38077746..22df5b0fb80e1c9550220bc4971acaa8cd4218e2 100644 (file)
--- a/lily/note-performer.cc
+++ b/lily/note-performer.cc
@@ -47,11 +47,11 @@ Note_performer::create_audio_elements ()
       while (note_evs_.size ())
        {
          Music* n = note_evs_.pop ();
-         Pitch *pit =  unsmob_pitch (n->get_mus_property ("pitch"));
+         SCM pit =  n->get_mus_property ("pitch");
 
-         if (pit)
+         if (Pitch * pitp = unsmob_pitch (pit))
            {
-             Audio_note* p = new Audio_note (*pit,  n->get_length (), transposing_i);
+             Audio_note* p = new Audio_note (*pitp,  n->get_length (), transposing_i);
              Audio_element_info info (p, n);
              announce_element (info);
              notes_.push (p);