Re: \include en fonction de la version de Lilypond utilisée

[Jean Abou Samra]

Le lundi 01 mai 2023 à 19:47 +0200, Simon Martineau a écrit :

Merci Jean ! Bonne idée en effet ! Comment insérer#:factor (/ staff-height pt 20) dans la deuxième partie du code ? J’ai essayé de cette manière mais j’ai un message d’erreur :

$(if (ly:version? >= '(2 25 4))
     #{
       \paper {
         fonts.roman = "Noto Serif"
       }
     #}
     #{
       \paper {
         fonts = #(set-global-fonts
                   #:roman "Noto Serif"
                   #:factor (/ staff-height pt 20))
       }
     #})

Ah oui, en effet, il y a une bizarrerie ici (c'est aussi pour cela que la syntaxe a été changée) :

#(define my-staff-height #f)
\paper {
  #(set! my-staff-height staff-height)
}
$(if (ly:version? >= '(2 25 4))
     #{
       \paper {
         fonts.roman = "Noto Serif"
       }
     #}
     #{
       \paper {
         fonts = #(set-global-fonts
                   #:roman "Noto Serif"
                   #:factor (/ my-staff-height (ly:pt 1) 20))
       }
     #})

Cordialement,

Jean

signature.asc
Description: This is a digitally signed message part