Writing to a webview EventSource from Clojure

gistfile1.txt

(def data-chan (async/chan))

(defn webview-writer [chan]
  (let [istream (PipedInputStream.)
        ostream (PipedOutputStream. istream)]
    (async/thread
      (loop []
        (when-some [s (async/<!! chan)]          
          (let [event (str "event: test\ndata: "s"\n\n")]
            (.write ostream (.getBytes event "UTF-8"))
            (.flush ostream))
          (recur))))
    istream))

... pass istream to a webview WebRequestResponse which internally uses EventSource in js to read