如何在Lisp中创建和写入文本文件

Question

我想知道，如何在lisp中创建和编写文本文件。 我只想写简单的行：

"break 1"
"break 2"

我在Window 7上使用LispWorks IDE

Answer 1

(with-open-file (str "/.../filename.txt"
                     :direction :output
                     :if-exists :supersede
                     :if-does-not-exist :create)
  (format str "write anything ~%"))

您也可以为with-open-file宏选择不同的设置。如果您使用:append代替:supersede，那么您可以在保留其上下文的同时写入文本文件，而不是取代可用内容。