              (a/update conn t-insert data)
              (a/update conn t-delete nil))
            (do
+             (a/update conn u-insert data)
+             (a/update conn u-delete nil))
+           (do
              (a/update conn r-insert data)
              (a/update conn r-delete nil))))))))
 

            (jdbc/query db-con [s-select] {:as-arrays? true})
            (a/query a/fetch-rows conn s-select nil)
            (a/query a/fetch-rows conn t-select nil)
            (a/query a/fetch-rows conn r-select nil)))))))

(a/defsql t-insert "INSERT INTO emp (name, salary, dept) VALUES (^string $name, ^int $salary, ^string $dept)")
(a/defsql t-delete "DELETE FROM emp")
(a/defsql t-select "SELECT ^string name, ^int salary, ^string dept FROM emp")


(def u-insert (assoc t-insert
                :param-setter (p/make-params-layer [:name :salary :dept] [:string :int :string])))
(def u-delete (assoc t-delete
                :param-setter (p/make-params-layer [] [])))
(def u-select (assoc t-select
                :param-setter (p/make-params-layer [] [])
                :row-maker    (r/make-columns-reader [:string :int :string])))


(def r-insert (assoc t-insert
