]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/regression/tuplet-nest.ly
Fix some bugs in the dynamic engraver and PostScript backend
[lilypond.git] / input / regression / tuplet-nest.ly
index 0aede61efabe7e5778f302001e60a97622477ada..7bbe8e817af0e57bc6061107411d3dd19076f2c0 100644 (file)
@@ -1,33 +1,37 @@
-\version "1.7.16"
-\header {
-  texidoc="Manual hack for nested tuplets, move outer tuplet up."
-}
 
-#(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))))
+\version "2.7.39"
 
-#(define text-checker-once #t)
+\header {
+    texidoc=" Tuplets may be nested."
+}
 
-\score {
-  \notes\relative c'' {
+\paper {
+  ragged-right = ##t  
+  indent = 0.0
+}
 
-    \property Voice.tupletNumberFormatFunction = #fraction-tuplet-formatter
+\relative c'' {
+  \set tupletNumberFormatFunction = #fraction-tuplet-formatter
+  \times 4/6 {
+    \times 2/3 {
+      a a a
+    }
+    \times 3/5 {
+      a a a a a
+    }
+  }
 
-    \outputproperty #(make-text-checker-once "2:3")
-      #'extra-offset = #'(0 . 1.5)
+  s1*1/6
+  
+  \stemUp
+  \times 4/6 {
     \times 2/3 {
-      \times 2/3 {
-        a a a
-      }
-      \times 3/5 {
-        a a a a a
-      }
+      a1*1/6 a f'
+    }
+    \times 3/5 {
+      c f g a b 
     }
   }
-  \paper { raggedright = ##t}
+  
 }
-%% new-chords-done %%
+