Cacher is the code snippet organizer for pro developers

(defn- read-lines-until-empty []
  (loop [l (read-line)
         a []]
    (if (empty? l)
      a
      (recur (read-line) (conj a l)))))