function | removed v0.0-1503 | added v0.0-927 | Edit |
(read-headers rdr)
(defn read-headers [rdr]
(loop [next-line (.readLine rdr)
header-lines []]
(if (= "" next-line)
header-lines ;we're done reading headers
(recur (.readLine rdr) (conj header-lines next-line)))))