   [sql-template result-types
    {:keys [make-param-setter
            make-row-maker
-           make-column-reader]
+           make-column-reader
+           sql-name]
     :or {make-param-setter  (fn [param-keys param-types]
                               (eval `(fn [^PreparedStatement prepared-stmt# params#]
                                        (p/lay-params prepared-stmt# ~param-keys ~param-types params#))))

                                (fn [^ResultSet result-set ^long col-index]
                                  (when-not (<= 1 col-index n)
                                    (i/expected s col-index))
                                  (iresult/read-column-value result-set col-index))))}
    :as options}]
  (i/expected vector? "vector of SQL template tokens" sql-template)
  (i/expected vector? "vector of result column types" result-types)

                                (do
                                  (i/expected vector? "vector of result types" result-types)
                                  (doseq [t result-types]
                                    (when-not (contains? t/single-typemap t) (i/expected-result-type t)))
                                  (let [rsyms (-> (count result-types)
                                                (repeatedly gensym)
                                                vec)
