將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）。