luciano/pods
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Don't keep reading on EOF

Browse source
This commit is contained in:
Michiel Borkent 2020-05-12 11:42:42 +02:00
parent 630161441b
commit ed996f6f41
1 changed files with 38 additions and 35 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
src/babashka/pods/impl.clj
View file

@ -38,8 +38,11 @@
:json #(cheshire/parse-string-strict % true))] :json #(cheshire/parse-string-strict % true))]
(try (try
(loop [] (loop []
(let [reply (read stdout) (let [reply (try (read stdout)
id (get reply "id") (catch java.io.EOFException _
::EOF))]
(when-not (identical? ::EOF reply)
(let [id (get reply "id")
id (bytes->string id) id (bytes->string id)
value* (find reply "value") value* (find reply "value")
value (some-> value* value (some-> value*
@ -72,7 +75,7 @@
(println out))) (println out)))
(when err (binding [*out* err-stream] (when err (binding [*out* err-stream]
(println err)))) (println err))))
(recur)) (recur))))
(catch Exception e (catch Exception e
(binding [*out* err-stream] (binding [*out* err-stream]
(prn e)))))) (prn e))))))