 ;; ## batch
 
 (defn batch
-  "Does not return a transducer. Takes sequence of items and returns a
-  sequence of batches of items from the original sequence, at most `n` long."
+  "Takes sequence of items and returns a sequence of batches of items from the original
+  sequence, at most `n` long."
   [n rows]
   (partition n n [] rows))
 

            comment-re      #"^\#"}
     :as opts}]
   (let [map-fn (when mappify
                  (if structs
                    (semantic-csv.transducers/structify {:keyify keyify :header header})
                    (semantic-csv.transducers/mappify {:keyify keyify :header header}))) ;; use mappify or structify
         remove-fn (when remove-comments
                     (semantic-csv.transducers/remove-comments {:comment-re comment-re :comment-char comment-char}))
         cast-with-fn (when cast-fns
                        (semantic-csv.transducers/cast-with cast-fns {:exception-handler cast-exception-handler :only cast-only}))
         ]
     (apply comp (remove nil? [remove-fn map-fn cast-with-fn]))))
  ; Use all defaults
  ([]
   (process {})))

;; Using this function, the code we've been building above is reduced to the following:
;;

;;
;; These functions can be imported and used in your `:cast-fns` specification.
;; They focus on handling some of the mess of dealing with numeric casting.
;; None of these functions are transducers.

;; ## ->int

