>>512
ごめん、よく分からない。
,@ って実行時に展開されないの？
(define (conc-len x) (+ `,@(map length x))) じゃ駄目？