将Java文件作为惰性Clojure序列处理

Question

在Clojure中,在包含从Java序列化的浮点值的文件中获取延迟序列会是什么？(我已经玩弄了一种with-open基于行读取示例的方法,但似乎无法连接点以将流作为浮点数处理.)

谢谢.

Answer 1

(defn float-seqs [#^java.io.DataInputStream dis]
  (lazy-seq
    (try
      (cons (.readFloat dis) (float-seqs dis))
      (catch java.io.EOFException e
        (.close dis)))))

(with-open [dis (-> file java.io.FileInputStream. java.io.DataInputStream.)]
  (let [s (float-seqs dis)]
    (doseq [f s]
      (println f))))

如果您确定要使用整个seq,则不需要使用with-open.

如果你使用with-open,请仔细检查你是否没有泄漏其范围之外的seq(或派生的seq).