讀Lisp的一個字符串對象

Question

我熟悉基本的模板從文件中收集Lisp的對象，如：

(with-open-file (stream "filename.lisp") 
    (loop for object = (read stream nil 'eof) 
      until (eq object 'eof) 
      collect object)) 

但我不知道如何翻譯成聚集到這個對象一個字符串，例如使用read-from-string。你是否必須跟蹤你在字符串中遺漏的索引？另外，如何避免在輸入中與eof或任何其他合法的Lisp對象（如nil或t）發生名稱衝突？

Answer 1

您可以使用with-input-from-string從字符串讀取。

爲防止與eof符號發生衝突，可以使用動態創建的未插入符號或其他對象。

(with-input-from-string (stream "this is a (list of 3 things)") 
    (loop with eof-marker = '#:eof 
     for object = (read stream nil eof-marker) 
     until (eq object eof-marker) 
     collect object))