patch::: 1.3.108.jcn3

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

diff --git a/lily/note-performer.cc b/lily/note-performer.cc
index f455204067df9a2a76e4463d1f11ed3bdc94de9f..d63d0c442b52110376b1f745083b792ba9c05963 100644 (file)
--- a/lily/note-performer.cc
+++ b/lily/note-performer.cc
@@ -3,7 +3,7 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c) 1996,  1997--1999 Jan Nieuwenhuizen <janneke@gnu.org>
+  (c) 1996--2000 Jan Nieuwenhuizen <janneke@gnu.org>
  */
 
 #include "note-performer.hh"
@@ -20,31 +20,24 @@ Note_performer::Note_performer ()
 {
 }
 
-void 
-Note_performer::do_print () const
-{
-#ifndef NPRINT
-  if (note_req_l_arr_.size()>0)
-    for(int i=0;i<note_req_l_arr_.size();i++)
-      note_req_l_arr_[i]->print ();
-#endif
-}
+
 
 void 
-Note_performer::do_process_requests () 
+Note_performer::deprecated_process_music () 
 {
   if (note_req_l_arr_.size ())
     {
       int transposing_i = 0;
       //urg
-      SCM prop = get_property ("transposing", 0);
-      if (SCM_NUMBERP(prop)) 
+      SCM prop = get_property ("transposing");
+      if (gh_number_p(prop)) 
        transposing_i = gh_scm2int (prop);
 
       while (note_req_l_arr_.size ())
        {
          Note_req* n = note_req_l_arr_.pop ();
-         Audio_note* p = new Audio_note (n->pitch_, n->length_mom (), transposing_i);
+         Pitch pit =  * unsmob_pitch (n->get_mus_property ("pitch"));
+         Audio_note* p = new Audio_note (pit,  n->length_mom (), transposing_i);
          Audio_element_info info (p, n);
          announce_element (info);
          note_p_arr_.push (p);