Am 14.01.2015 um 04:08 schrieb Paul Morris:
Urs Liska wrote
Now I've checked - it's perfect. Thank you again!
There is no alist? predicate, but it's very easy to define:
#(define (alist? lst)
(and (list? lst)
(every pair? lst)))
Glad to help and glad someone else is benefiting from this. (On a related
note, I also worked out how to create custom context properties if that's
ever useful.)
Currently this doesn't ring a bell with me but I can imagine I'll come
back to this one day.
Hey, look at you slinging that Scheme like it was nothing! ;-)
Yes, I made some surprising progress with Scheme recently. I didn't even
get stuck in the ands and parens in the actual predicate I wrote
#(define (annotation? obj)
(and
(and (list? obj)
(every pair? obj))
(and (if (assoc-ref obj "type") #t #f)
(if (assoc-ref obj "location") #t #f))))
:-)
Unfortunately that does *not* mean there are no huge mysteries left ...
Urs
Cheers,
-Paul
--
View this message in context:
http://lilypond.1069038.n5.nabble.com/Attaching-an-alist-to-a-grob-tp170412p170434.html
Sent from the User mailing list archive at Nabble.com.
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user