为什么向作者写入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将刷新输出流缓冲区。