Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!uunet!spool.mu.edu!agate!cork.Berkeley.EDU!maverick
From: maverick@cork.Berkeley.EDU (Vance Maverick)
Newsgroups: comp.lang.lisp
Subject: Re: String to List function!
Keywords: string list
Message-ID: <1991May24.215050.7088@agate.berkeley.edu>
Date: 24 May 91 21:50:50 GMT
References: <326@daily-planet.concordia.ca>
Sender: root@agate.berkeley.edu (Charlie Root)
Reply-To: maverick@cork.Berkeley.EDU (Vance Maverick)
Organization: University of California, Berkeley
Lines: 9

<cl> (defun string-to-list (string)
        (with-input-from-string (strm (concatenate 'string "(" string ")"))
          (read strm)))

STRING-TO-LIST
<cl> (string-to-list "abc ( 1 2 3) def")

(ABC (1 2 3) DEF)
<cl>