From 57f146ee41c949e74a06b3f27a24b65fffa9fab8 Mon Sep 17 00:00:00 2001 From: Sean Corfield Date: Wed, 21 Aug 2019 14:37:19 -0700 Subject: [PATCH] Add test for as-maps-adapter --- test/next/jdbc/result_set_test.clj | 21 +++++++++++++++++++++ 1 file changed, 21 insertions(+) diff --git a/test/next/jdbc/result_set_test.clj b/test/next/jdbc/result_set_test.clj index ede5374..ffc9cfa 100644 --- a/test/next/jdbc/result_set_test.clj +++ b/test/next/jdbc/result_set_test.clj @@ -109,6 +109,27 @@ (is (contains? row (if (postgres?) :fruit/appearance :FRUIT/appearance))) (is (nil? ((if (postgres?) :fruit/appearance :FRUIT/appearance) row))) (is (= 3 ((if (postgres?) :fruit/id :FRUIT/id) row))) + (is (= "Peach" ((if (postgres?) :fruit/name :FRUIT/name) row))))) + (testing "adapted row builder" + (let [row (p/-execute-one (ds) + ["select * from fruit where id = ?" 3] + {:builder-fn (rs/as-maps-adapter + rs/as-modified-maps + (fn [^ResultSet rs + ^ResultSetMetaData rsmeta + ^Integer i] + (condp = (.getColumnType rsmeta i) + java.sql.Types/VARCHAR + (.getString rs i) + java.sql.Types/INTEGER + (.getLong rs i) + (.getObject rs i)))) + :label-fn str/lower-case + :qualifier-fn identity})] + (is (map? row)) + (is (contains? row (if (postgres?) :fruit/appearance :FRUIT/appearance))) + (is (nil? ((if (postgres?) :fruit/appearance :FRUIT/appearance) row))) + (is (= 3 ((if (postgres?) :fruit/id :FRUIT/id) row))) (is (= "Peach" ((if (postgres?) :fruit/name :FRUIT/name) row)))))) (deftest test-mapify