Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!mnetor!uunet!seismo!mcvax!enea!chalmers!sundin
From: sundin@chalmers.UUCP (Ulf Sundin)
Newsgroups: comp.lang.lisp
Subject: Implode, explode and Common Lisp
Message-ID: <1840@chalmers.UUCP>
Date: Tue, 4-Aug-87 03:55:57 EDT
Article-I.D.: chalmers.1840
Posted: Tue Aug  4 03:55:57 1987
Date-Received: Sat, 8-Aug-87 08:54:55 EDT
Reply-To: sundin@chalmers.UUCP (Ulf Sundin)
Distribution: world
Organization: Dept. of CS, Chalmers, Sweden
Lines: 33

I intend to translate a rather large Franz Lisp program
to Common Lisp. However, some parts of the progeram relies
heavily on the use of 'implode' and 'explode' for which
no equivalents are defined in Common Lisp.

What is needed is thus the following functions:
(in Common Lisp)

  (implode 'l_arg)

where l_arg is assumed to be a list of symbols (and strings).
The function should return the symbol whose printname
is the result of concatenating the first characters
of the print names of the symbols.

If it facilitates the solution, you may assume that the list
l_arg only contains 1-characther symbols.

  (explode 'g_arg)

returning a list of the characters used to print g_arg.

The simpler function

  (aexplode 's_arg)

which only accepts a symbol as an argument
may also be useful.


Ulf Sundin
Chalmers University of Tech, Sweden
...mcvax!enea!chalmers!sundin