lisp - 如何从文件中读取 sexp

Question

如果我写一个文件使用

(with-open-file (s "~/example.sexp" :direction :output)
           (write '(1 2 3) :stream s)
           (write '(4 5 6) :stream s)
           (write '(7 8 9) :stream s))

创建的文件包含

(1 2 3)(4 5 6)(7 8 9)

但是当我尝试打开并阅读它时

(setf f (open "~/example.sexp"))
(read :input-stream f)

我收到“:INPUT-STREAM 不是 STREAM 类型”错误。

(type-of f)

返回 STREAM::LATIN-1-FILE-STREAM，它看起来至少接近我需要的。有什么区别？

如何读取我写入文件的列表？

Answer 1

READ 的参数错误。它应该只是(read f)，而不是(read :input-stream f)。