Am 19.04.19 um 16:35 schrieb Thomas Morley:
I could do
(cons '(a b c) (list (car (list-pair)) (cdr (list-pair))))
and to get the last list: (last ...)
Looksy clumsy, though.

Any better method?

I’m not sure what you want to do here. But maybe it would be easier to convert the pair of lists to a lists of lists first?

\version "2.21.0"

#(begin
  (define (list-pair->list-list the-list-pair)
    (list (car the-list-pair) (cdr the-list-pair)))
  (define foo '((a b c) . (d e f)))
  (display foo)
  (newline)
  (display (list-pair->list-list foo)))

_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to