Welcome to the CHICKEN Scheme pasting service

macro added by andyjpb on Tue Nov 15 23:06:11 2011

#;6> (define-syntax et (lambda (form rename compare?) (transform (cadr form))))
#;7> (et (#\< #\>))

Error: malformed expression: (#\< . "524a50782178998021a88b8cd4c8dcd8")

        Call history:

        <eval>          [transform] (string (car x))
        <eval>          [transform] (car x)
        md5.scm: 26   message-digest#make-message-digest
        <eval>          [transform] (transform (cdr x))
        <eval>          [transform] (cdr x)
        <eval>          [transform] (null? x)
        <syntax>                ((#\< . "524a50782178998021a88b8cd4c8dcd8") (#\> . "cedf8da05466bb54708268b3c694a78f"))
        <syntax>                (#\< . "524a50782178998021a88b8cd4c8dcd8")      <--
#;7> ,x (et (#\< #\>))
((#\< . "524a50782178998021a88b8cd4c8dcd8")
 (#\> . "cedf8da05466bb54708268b3c694a78f"))
#;7>
[ permalink | raw ]

Your annotation:

Enter a new annotation:

Your nick:
The title of your paste:
Your paste (mandatory) :
What's the R5RS procedure to access the second element of a pair?
Visually impaired? Let me spell it for you (wav file) download WAV