CVSROOT:        /cvsroot/lilypond
Module name:    lilypond
Branch:         
Changes by:     Han-Wen Nienhuys <[EMAIL PROTECTED]>    05/04/17 22:41:23

Modified files:
        .              : ChangeLog 
        lily           : global-context-scheme.cc performance.cc 
        lily/include   : music-output.hh performance.hh 
Added files:
        lily           : music-output.cc 

Log message:
        (process): return #f iso. #<undefined>. This
        prevents #<undefined> leaking into GUILE-userspace.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/ChangeLog.diff?tr1=1.3450&tr2=1.3451&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/lily/music-output.cc?rev=1.1
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/lily/global-context-scheme.cc.diff?tr1=1.6&tr2=1.7&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/lily/performance.cc.diff?tr1=1.54&tr2=1.55&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/lily/include/music-output.hh.diff?tr1=1.20&tr2=1.21&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/lily/include/performance.hh.diff?tr1=1.20&tr2=1.21&r1=text&r2=text

Patches:
Index: lilypond/ChangeLog
diff -u lilypond/ChangeLog:1.3450 lilypond/ChangeLog:1.3451
--- lilypond/ChangeLog:1.3450   Sun Apr 17 21:16:31 2005
+++ lilypond/ChangeLog  Sun Apr 17 22:41:22 2005
@@ -1,3 +1,8 @@
+2005-04-18  Han-Wen Nienhuys  <[EMAIL PROTECTED]>
+
+       * lily/performance.cc (process): return #f iso. #<undefined>. This
+       prevents #<undefined> leaking into GUILE-userspace.
+
 2005-04-17  Han-Wen Nienhuys  <[EMAIL PROTECTED]>
 
        * config.hh.in: remove HAVE_PANGO_FC_FONT_MAP_ADD_DECODER_FIND_FUNC
@@ -57,7 +62,7 @@
        * framework-eps.scm: code added so that a macro \betweenLilyPondSystem
        with one parameter can be defined in a LaTeX file when processed
        by lilypond-book this will be evaluated between the systems of
-       a muti-system score. The parameter is the number of systems processed.
+       a multi-system score. The parameter is the number of systems processed.
 
 2005-04-16  Jan Nieuwenhuizen  <[EMAIL PROTECTED]>
 
Index: lilypond/lily/global-context-scheme.cc
diff -u lilypond/lily/global-context-scheme.cc:1.6 
lilypond/lily/global-context-scheme.cc:1.7
--- lilypond/lily/global-context-scheme.cc:1.6  Tue Apr 12 22:49:28 2005
+++ lilypond/lily/global-context-scheme.cc      Sun Apr 17 22:41:23 2005
@@ -27,6 +27,7 @@
 
   Music_output *output = g->get_output ();
   progress_indication ("\n");
+
   /* ugh, midi still wants outname  */
   return output->process (ly_scm2string (outname));
 }
Index: lilypond/lily/include/music-output.hh
diff -u lilypond/lily/include/music-output.hh:1.20 
lilypond/lily/include/music-output.hh:1.21
--- lilypond/lily/include/music-output.hh:1.20  Mon Mar 28 22:26:30 2005
+++ lilypond/lily/include/music-output.hh       Sun Apr 17 22:41:23 2005
@@ -16,11 +16,8 @@
 class Music_output
 {
 public:
-  virtual SCM process (String)
-  {
-    return SCM_EOL;
-  }
-  virtual ~Music_output () {}
+  virtual SCM process (String); 
+  virtual ~Music_output ();
 };
 
 #endif /* MUSIC_OUTPUT_HH */
Index: lilypond/lily/include/performance.hh
diff -u lilypond/lily/include/performance.hh:1.20 
lilypond/lily/include/performance.hh:1.21
--- lilypond/lily/include/performance.hh:1.20   Thu Mar 10 14:36:12 2005
+++ lilypond/lily/include/performance.hh        Sun Apr 17 22:41:23 2005
@@ -27,7 +27,7 @@
   SCM process (String);
 
   Link_array<Audio_staff> audio_staffs_;
-  Cons<Audio_element> *audio_elem_p_list_;
+  Cons<Audio_element> *audio_element_list_;
   Output_def *midi_;
 };
 
Index: lilypond/lily/performance.cc
diff -u lilypond/lily/performance.cc:1.54 lilypond/lily/performance.cc:1.55
--- lilypond/lily/performance.cc:1.54   Tue Apr 12 22:49:28 2005
+++ lilypond/lily/performance.cc        Sun Apr 17 22:41:23 2005
@@ -26,12 +26,12 @@
 Performance::Performance ()
 {
   midi_ = 0;
-  audio_elem_p_list_ = 0;
+  audio_element_list_ = 0;
 }
 
 Performance::~Performance ()
 {
-  delete audio_elem_p_list_;
+  delete audio_element_list_;
 }
 
 void
@@ -146,7 +146,7 @@
     {
       audio_staffs_.push (s);
     }
-  audio_elem_p_list_ = new Killing_cons<Audio_element> (p, audio_elem_p_list_);
+  audio_element_list_ = new Killing_cons<Audio_element> (p, 
audio_element_list_);
 }
 
 SCM
@@ -165,5 +165,5 @@
 
   output (midi_stream);
   progress_indication ("\n");
-  return SCM_UNDEFINED;
+  return SCM_BOOL_F;
 }


_______________________________________________
Lilypond-cvs mailing list
[EMAIL PROTECTED]
http://lists.gnu.org/mailman/listinfo/lilypond-cvs

Reply via email to