 ;; by passing a single casting function as the first argument.
 ;;
 ;;     => (with-open [in-file (io/reader "test/test.csv")]
-;;          (transduce
-;;            (comp
-;;              (remove-comments)
-;;              (mappify)
-;;              (cast-with #(Integer/parseInt %) {:only [:this :that]}))
-;;            conj
-;;            []
-;;            (csv/parse-csv in-file)))
+;;          (into []
+;;                (comp (remove-comments)
+;;                      (mappify)
+;;                      (cast-with #(Integer/parseInt %) {:only [:this :that]}))
+;;                (csv/parse-csv in-file)))
 ;;
 ;;     ({:this 1, :that 2, :more "stuff"}
 ;;      {:this 2, :that 3, :more "other yeah"})

;;     (with-open [in-file (io/reader "test/test.csv")
;;                 out-file (io/writer "test-out.csv")]
;;       (->>
;;         (transduce
;;           (comp
;;             (remove-comments)
;;             (mappify)

;; Let's try casting a numeric column using this function:
;;
;;     => (with-open [in-file (io/reader "test/test.csv")]
;;          (into []
;;                (comp (remove-comments)
;;                      (mappify)
;;                      (cast-with {:this #(Integer/parseInt %)}))
;;                (csv/parse-csv in-file)))
;;
;;     ({:this 1, :that "2", :more "stuff"}
;;      {:this 2, :that "3", :more "other yeah"})
