X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Ftuplet-nest.ly;h=8c10cdcd1b695976121f7d35bb1d7a49ab55b8e9;hb=e45059ae37b240ce52639ad5c49110b510a89481;hp=afed1d3db34536ad86f32682b7cc7199ad7374ce;hpb=2b4664417d36bed2b408d769e3dfd96732710d54;p=lilypond.git diff --git a/input/regression/tuplet-nest.ly b/input/regression/tuplet-nest.ly index afed1d3db3..8c10cdcd1b 100644 --- a/input/regression/tuplet-nest.ly +++ b/input/regression/tuplet-nest.ly @@ -1,33 +1,49 @@ -\version "1.7.6" + +\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 { linewidth = -1. } + + 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 %% +