Re: "real book" sur macbook (suite)

[JeanPi]

Bonjour,


Xavier Scheuer wrote:
> 
> 
> Pourtant il me semble que ton problème vient simplement du fait que
> certains bouts de code sont repris en commentaire (après un ';' en
> Scheme).  Sûrement à cause de sauts de ligne aux mauvais endroits.
> 
> Je n'ai rien compris au code mais essaye ceci :
> 
> #(define (chordNamer pitch)
>       (let* ((alt (ly:pitch-alteration pitch)))
>               (make-line-markup
>                       (list
>                               (make-simple-markup
>                                       (vector-ref #("C" "D" "E" "F" "G" "A" 
> "B")
>                                               (ly:pitch-notename pitch)))
>                               (if (= alt 0)    ; alteration ?
>                                       (markup "")    ; non
>                                       (if (= alt FLAT)    ; b ou #
>                                               (markup ">")
>                                               (markup "<")
>                                       )
>                               )
>                       )
>               )
>       )
> )
> 
> 

Effectivement le problème viens surement de là. L'écriture "développée"
prends plus de place mais permet de mieux comprendre le code. Je n'ai fait
que modifier le fonction schème "chordNamer" pour remplacer les altérations
lilypond par les miennes. 

Donc méfiance lorsqu'on réduit du code surtout après les commentaires ";",
tout ce qui vient après ";" dans la ligne est ignoré dans l'interprétation
du code. 

Si on veut réduire il vaut mieux supprimer les commentaires ce qui peut
donner ceci

#(define (chordNamer pitch) (let* ((alt (ly:pitch-alteration pitch))) 
(make-line-markup (list (make-simple-markup (vector-ref #("C" "D" "E" "F"
"G" "A" "B") 
(ly:pitch-notename pitch))) (if (= alt 0) (markup "") (if (= alt FLAT) 
(markup ">") (markup "<") ) ) ) ) ) )


Cordialement

JP




-----
http://sites.google.com/site/jpgzic/ Lily Pond et le Jazz 
-- 
View this message in context: 
http://n2.nabble.com/real-book-sur-macbook-suite-tp4917499p4920064.html
Sent from the LilyPond French Users mailing list archive at Nabble.com.