;;;;
;;;; source file of the GNU LilyPond music typesetter
;;;;
-;;;; (c) 2000--2005 Jan Nieuwenhuizen <janneke@gnu.org>
+;;;; (c) 2000--2007 Jan Nieuwenhuizen <janneke@gnu.org>
;;; specify generic beam begin and end times
((end 1 32 3 2) . ,(ly:make-moment 1 2))
((end 1 32 3 2) . ,(ly:make-moment 5 8))
((end 1 32 3 2) . ,(ly:make-moment 3 4))
+ ((end 1 32 3 2) . ,(ly:make-moment 7 8))
((end 1 32 3 2) . ,(ly:make-moment 9 8))
((end 1 32 3 2) . ,(ly:make-moment 5 4))
((end 1 32 3 2) . ,(ly:make-moment 11 8))
#f
(let* ((beat-length (get 'beatLength (ly:make-moment 1 1)))
(measure-length (get 'measureLength (ly:make-moment 1 1)))
- (measure-pos (get 'measurePosition (ly:make-moment 0 1)))
+ (measure-pos (get 'measurePosition ZERO-MOMENT))
(settings (get 'autoBeamSettings '()))
(function (list (if (= dir START) 'begin 'end)))
(num-mom (ly:moment-div measure-length beat-length))