X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Ftuplet-nest.ly;h=8c10cdcd1b695976121f7d35bb1d7a49ab55b8e9;hb=74daefdc62920b729061cb8711b63890de1f0c17;hp=0aede61efabe7e5778f302001e60a97622477ada;hpb=72972afb27cf99f5ae432f4a1463d4f6de6107a0;p=lilypond.git diff --git a/input/regression/tuplet-nest.ly b/input/regression/tuplet-nest.ly index 0aede61efa..8c10cdcd1b 100644 --- a/input/regression/tuplet-nest.ly +++ b/input/regression/tuplet-nest.ly @@ -1,33 +1,49 @@ -\version "1.7.16" + +\version "2.19.21" + \header { - texidoc="Manual hack for nested tuplets, move outer tuplet up." + texidoc=" Tuplets may be nested." +} + +\paper { + ragged-right = ##t + indent = 0.0 } -#(define (make-text-checker-once text) - (lambda (grob) (and text-checker-once - (if (equal? text (ly:get-grob-property grob 'text)) - (begin - (set! text-checker-once #f) #t) - #f)))) - -#(define text-checker-once #t) - -\score { - \notes\relative c'' { - - \property Voice.tupletNumberFormatFunction = #fraction-tuplet-formatter - - \outputproperty #(make-text-checker-once "2:3") - #'extra-offset = #'(0 . 1.5) - \times 2/3 { - \times 2/3 { - a a a - } - \times 3/5 { - a a a a a - } +\relative { + \tuplet 3/4 { + \tuplet 3/2 { c''8[ c c] } + \tuplet 3/2 { c8[ c c] } + \tuplet 3/2 { c8[ c c] } + } + + \tuplet 3/4 { + \tuplet 3/2 { a8[ a a] } + \tuplet 3/2 { a8[ a a] } + \tuplet 3/2 { a8[ a a] } + } + + \override TupletNumber.text = #tuplet-number::calc-fraction-text + \tuplet 6/4 { + \tuplet 3/2 { + a4 a a + } + \tuplet 5/3 { + a4 a a a a } } - \paper { raggedright = ##t} + + s1*1/6 + + \stemUp + \tuplet 6/4 { + \tuplet 3/2 { + a1*1/6 a f' + } + \tuplet 5/3 { + c f g a b + } + } + } -%% new-chords-done %% +