2017-08-27 10:40 GMT+02:00 Thomas Morley <[email protected]>:
> #(define (split-string strg char-pair)
> ;; split a string at all occurrences of both characters in char-pair
> ;; remark: with guilev2 string-split accepts a char-set as second argument
> (append-map
> (lambda (s) (string-split s #\}))
> (string-split strg #\{)))
Ofcourse this should be:
#(define (split-string strg char-pair)
;; split a string at all occurrences of both characters in char-pair
;; remark: with guilev2 string-split accepts a char-set as second argument
(append-map
(lambda (s) (string-split s (car char-pair)))
(string-split strg (cdr char-pair))))
_______________________________________________
lilypond-user mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/lilypond-user
