Charles Winston <[email protected]> writes:

> Here is the function inside chord-name.scm
>
>
> ;; chordmode-to-exceptions
> (define-safe-public (chordmode-to-exceptions chord markup)
>   "Transform event-chord entered in chord mode to alist
> entry in chordSemanticsNameExceptions list
> "
>   (define (is-semantics-event? x)
>     (ly:in-event-class? x 'chord-semantics-event))

Event classes are for stream events, not for music expressions.

>   (define (get-semantics chord)
>     (let* ((elts (ly:music-property chord 'elements))
>            (semantics-event (filter is-semantics-event? elts))
>            (semantics-list (ly:event-property semantics-event 
> 'chord-semantics)))

ly:event-property is for stream events, not for music expressions.

>       semantics-list))
>   (list (cons (get-semantics chord) markup)))

Stream events are generated from music expressions during iteration of
music expressions (the interpretation phase making use of engravers
etc).

-- 
David Kastrup

_______________________________________________
lilypond-devel mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/lilypond-devel

Reply via email to