[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Q re LSR snippet 744
From: |
Michael Gerdau |
Subject: |
Q re LSR snippet 744 |
Date: |
Sat, 19 Mar 2016 11:02:06 +0100 |
User-agent: |
KMail/5.1.3 (Linux/4.4.5-1-ARCH; KDE/5.19.0; x86_64; ; ) |
Hi list,
I'm playing with LSR snippet 744 and wish to make a small amendment to
its functionality. While trying to understand what it does I think it
is not working as it should.
Here is the link: http://lsr.di.unimi.it/LSR/Item?id=744
Most importantly I think the words 'lil le' and 'fis ker' should be
displayed without a separating space after the hyphen had been removed.
If I understand the snippet correctly this should be handled inside the
function reduce-hyphen.
%%%%%%%%%%%%%%%%%%%%
#(define (reduce-hyphens text)
(let eat ((wd (car text)) (wds (cdr text)))
(cond
((null? wds) (list wd))
((and (equal? "--" (car wds)) (not (null? (cdr wds))))
(eat (markup #:concat (wd (cadr wds)))
(cddr wds)))
(else (cons (markup wd) (eat (car wds) (cdr wds)))))))
%%%%%%%%%%%%%%%%%%%%
If I understand this correctly the #::concat should concatenate the
two syllables while removing the hyphen.
I then defined an optional hyphenreplacechar like so:
#(define hyphenreplacechar "-")
and changed the concatenation like so:
(eat (markup #:concat (wd hyphenreplacechar (cadr wds)))
(cddr wds)))
but that did not change anything visible.
At this point I'm stuck and need the deeper understanding of someone
more knowledgeable w/r to music functions.
Kind regards,
Michael
--
Michael Gerdau email: address@hidden
GPG-keys available on request or at public keyserver
signature.asc
Description: This is a digitally signed message part.
- Q re LSR snippet 744,
Michael Gerdau <=
- Re: Q re LSR snippet 744, Marc Hohl, 2016/03/19
- Re: Q re LSR snippet 744, Thomas Morley, 2016/03/19
- Re: Q re LSR snippet 744, Michael Gerdau, 2016/03/19
- Re: Q re LSR snippet 744, Thomas Morley, 2016/03/19
- Re: Q re LSR snippet 744, Simon Albrecht, 2016/03/19
- Re: Q re LSR snippet 744, Michael Gerdau, 2016/03/19
- Re: Q re LSR snippet 744, Thomas Morley, 2016/03/19
- Re: Q re LSR snippet 744, Thomas Morley, 2016/03/22
Re: Q re LSR snippet 744, David Kastrup, 2016/03/19