thinking of splitting up those productions functions above into separate use-cases:

(produce-while #(.hasMoreElements enum) #(.nextElement enum))
(iter yield done?) e.g. (iter #(.readLine rdr) false?)
(productions init f continue?) ;; as in API request pagination (CLJ-1906)