I need to read an input file which is not written out as lists.
I can use read-line and get it as a string.
how do I convert this string to a list.
eg of kind of lines to be read and converted
Line 13.4 24 50 100.0 45.6 78
eye 0 0 0
aim -75 10 12
One posible solution I have is to coerce the string into a list
and reformulate the list by "imploding" atoms separated by blank spaces together. This doesnt work for the number portion yet.But, I am still working on it.
Id be very interested in solutions to this as well. Id be happy to receive duplicates of any email-messages showing up.
I would expect something as trivial as
(defconstant +EOF-MARKER+ (make-symbol "EOF"))
(defun READ-TOKENS-FROM-STRING (string)
(with-input-from-string (stream string)
(loop for thing = (read stream nil +eof-marker+)
until (eq thing +eof-marker+)
collect thing)))
ought to suffice here. (Apologies to loop haters; conversion to "Lisp" is left as an exercise to the reader :-)
Sysop: | Keyop |
---|---|
Location: | Huddersfield, West Yorkshire, UK |
Users: | 362 |
Nodes: | 16 (2 / 14) |
Uptime: | 32:14:24 |
Calls: | 7,732 |
Files: | 12,873 |
Messages: | 5,731,053 |