reduce関数を使って文字列が入ったリストの要素を全て連結する。
(reduce (lambda ($0 $1) (concatenate 'string $0 ", " $1)) '("hoge" "fuga" "piyo"))
==> "hoge, fuga, piyo"
でもformat関数を使ったほうが楽かもしれない。
(format nil "~{~A~^, ~}" '("hoge" "fuga" "piyo"))
==> "hoge, fuga, piyo"
こういう単純な処理で割とつまずく。