Lazy byte sequence in Clojure given something to read from (like stdin)

byte_seq.clj

;; Similar to https://clojuredocs.org/clojure.core/line-seq,
;; but is byte-oriented instead of line-oriented

(defn byte-seq [^java.io.BufferedReader rdr]
  (lazy-seq
    (let [ch (.read rdr)]
      (if (= ch -1)
        '()
        (cons ch (byte-seq rdr))))))

;; For example, to create a lazy sequence of bytes from stdin,
;; You might use the following:

(import '(java.io BufferedReader))
(byte-seq (BufferedReader. *in*))