James <pkx1...@gmail.com> writes:
>> \language "english"
>> \version "2.18.2"
>>
>> cadenzaToMusic =
>> #(define-music-function (parser location cadenzaMusic music)
>> (ly:music? ly:music?)
>> "Adjust the length of `music and the measureLength, to fit the
>> length of
>> `cadenzaMusic"
>> (let* ((clen (ly:music-length cadenzaMusic))
>> (mlen (ly:music-length music))
>> (factor (ly:moment-div clen mlen))
>> (compressed (ly:music-compress music factor)))
>> ;; (format #t "factor : ~a\n" factor)
>> #{
>> \set Timing.measureLength = $clen
>> $compressed
>> \unset Timing.measureLength
>> #}))
Uh, \unset Timing.measureLength? I don't think that LilyPond is going
to be happy with an unset measure length.
--
David Kastrup
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
