为什么pprint会对作者截断输出？

Question

以下snippter：

(binding [*out* (writer "foo.txt")]
  (pprint models))

将输出截断为208Kb。 但是以下内容：

(spit "foo.txt"
      (with-out-str
        (pprint models)))

正常工作，不会截断输出。

为什么会这样？

Answer 1

听起来像缓冲区冲洗问题，试试这个：

(binding [*out* (writer "foo.txt")]
  (pprint models)
  (flush))

flush将刷新输出流缓冲区。