#;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>