Re: Emacs Lisp's "mapconcat" in Common Lisp?

On 2024-08-30, B. Pym <Nobody447095@here-nor-there.org> wrote:

Shorter:
>
(define (mapconcat fun lst sep)
  (string-join (map (compose x->string fun) lst) (x->string sep)))

"Concatenate" is a pleonasm for "catenate", which is based on a
Latin root for "chain". Chaining is implicitly together ("con").
Even the Unix dolts understood this, so we have /bin/cat
and strcat, and not /bin/concat and strconcat.

--
TXR Programming Language: http://nongnu.org/txr
Cygnal: Cygwin Native Application Library: http://kylheku.com/cygnal
Mastodon: @Kazinator@mstdn.ca