input/regression/tuplet-nest.ly

   1 \header {
   2   texidoc="Manual hack for nested tuplets"
   3 }
   4
   5 #(define (make-text-checker-once text)
   6   (lambda (grob) (and text-checker-once
   7                       (if (equal? text (ly-get-grob-property grob 'text))
   8                           (begin
   9                             (set! text-checker-once #f) #t)
  10                           #f))))
  11
  12 #(define text-checker-once #t)
  13
  14 \score {
  15   \notes\relative c'' {
  16
  17     \property Voice.tupletNumberFormatFunction = #fraction-tuplet-formatter
  18
  19     \outputproperty #(make-text-checker-once "2:3")
  20       #'extra-offset = #'(0 . 1)
  21     \times 2/3 {
  22       \times 2/3 {
  23         a a a
  24       }
  25       \times 3/5 {
  26         a a a a a
  27       }
  28     }
  29   }
  30   \paper { linewidth = -1. }
  31 }