Trattare un file di Java fluttua come una sequenza di Clojure pigro

Question

Quale sarebbe un modo ideologico in Clojure per ottenere una sequenza lenta su un file contenente valori float serializzati da Java? (Ho giocato con un approccio with-open basato su esempi di lettura linea, ma non riesco a collegare i punti per elaborare il flusso come float.)

Grazie.

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)))) 

Non è necessario utilizzare con-open se si è sicuri di consumare l'intero seq.

Se si utilizza con-open, ricontrollare che non si sta perdendo il seq (o un seq derivato) al di fuori del suo ambito.