CVSROOT:        /cvsroot/lilypond
Module name:    lilypond
Branch:         
Changes by:     Han-Wen Nienhuys <[EMAIL PROTECTED]>    05/09/17 16:16:31

Modified files:
        .              : ChangeLog 
        scm            : define-music-types.scm part-combiner.scm 

Log message:
        (music-descriptions): set length and
        start-callback for QuoteMusic

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/ChangeLog.diff?tr1=1.4130&tr2=1.4131&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/scm/define-music-types.scm.diff?tr1=1.65&tr2=1.66&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/scm/part-combiner.scm.diff?tr1=1.44&tr2=1.45&r1=text&r2=text

Patches:
Index: lilypond/ChangeLog
diff -u lilypond/ChangeLog:1.4130 lilypond/ChangeLog:1.4131
--- lilypond/ChangeLog:1.4130   Thu Sep 15 20:17:44 2005
+++ lilypond/ChangeLog  Sat Sep 17 16:16:30 2005
@@ -1,3 +1,8 @@
+2005-09-17  Han-Wen Nienhuys  <[EMAIL PROTECTED]>
+
+       * scm/define-music-types.scm (music-descriptions): set length and
+       start-callback for QuoteMusic
+
 2005-09-15  Mats Bengtsson  <[EMAIL PROTECTED]>
 
        * lily/tie.cc (get_configuration): Replace fabs -> abs for integer
@@ -8,7 +13,8 @@
        * stepmake/stepmake/python-module-rules.make
        ($(outdir)/%$(SHARED_MODULE_SUFFIX)): SHARED_FLAGS at the end.  
 
-       * lily/*.cc: remove <cmath> everywhere. <cmath> is included from real.hh
+       * lily/*.cc: remove <cmath> everywhere. <cmath> is included from
+       real.hh
 
 2005-09-12  Han-Wen Nienhuys  <[EMAIL PROTECTED]>
 
Index: lilypond/scm/define-music-types.scm
diff -u lilypond/scm/define-music-types.scm:1.65 
lilypond/scm/define-music-types.scm:1.66
--- lilypond/scm/define-music-types.scm:1.65    Mon Sep 12 12:20:26 2005
+++ lilypond/scm/define-music-types.scm Sat Sep 17 16:16:31 2005
@@ -401,7 +401,9 @@
      . (
        (description . "Quote preprocessed snippets of music. ")
        (iterator-ctor . ,Quote_iterator::constructor)
-       (types . (general-music))
+       (length-callback . ,Music_wrapper::length_callback)
+       (start-callback . ,Music_wrapper::start_callback)
+       (types . (general-music music-wrapper-music))
        ))
     
     (RelativeOctaveCheck
Index: lilypond/scm/part-combiner.scm
diff -u lilypond/scm/part-combiner.scm:1.44 lilypond/scm/part-combiner.scm:1.45
--- lilypond/scm/part-combiner.scm:1.44 Fri Jul  8 22:16:28 2005
+++ lilypond/scm/part-combiner.scm      Sat Sep 17 16:16:31 2005
@@ -461,7 +461,7 @@
                                     part-combine-listener))
         (first-voice-handle (last-pair noticed)))
 
-    ;; (display (last-pair noticed))
+    ;;(display first-voice-handle)
     (if (pair? first-voice-handle)
        (hash-set! tab name
                   ;; cdr : skip name string


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

Reply via email to