luciano/next-jdbc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Quieten fold tests now I've confirmed performance and thread usage

Browse source
This commit is contained in:
Sean Corfield 2020-06-27 14:35:18 -07:00
parent 90a6476e52
commit 53b5619566
1 changed files with 0 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
test/next/jdbc_test.clj
View file

@ -296,12 +296,10 @@ VALUES ('Pear', 'green', 49, 47)
(is (= ac (.getAutoCommit con))))))) (is (= ac (.getAutoCommit con)))))))
(deftest folding-test (deftest folding-test
(println "=== folding-test setup for" (:dbtype (db)))
(jdbc/execute-one! (ds) ["delete from fruit"]) (jdbc/execute-one! (ds) ["delete from fruit"])
(with-open [con (jdbc/get-connection (ds)) (with-open [con (jdbc/get-connection (ds))
ps (jdbc/prepare con ["insert into fruit(name) values (?)"])] ps (jdbc/prepare con ["insert into fruit(name) values (?)"])]
(prep/execute-batch! ps (mapv #(vector (str "Fruit-" %)) (range 1 1001)))) (prep/execute-batch! ps (mapv #(vector (str "Fruit-" %)) (range 1 1001))))
(println "=== folding-test running for" (:dbtype (db)))
(testing "foldable result set" (testing "foldable result set"
(testing "from a Connection" (testing "from a Connection"
(let [result (let [result
@ -315,7 +313,6 @@ VALUES ('Pear', 'green', 49, 47)
(is (= "Fruit-1000" (last result))))) (is (= "Fruit-1000" (last result)))))
(testing "from a DataSource" (testing "from a DataSource"
(doseq [n [1 2 3 4 5 100 300 500 700 900 1000 1100]] (doseq [n [1 2 3 4 5 100 300 500 700 900 1000 1100]]
(println " === partition size" n)
(testing (str "folding with n = " n) (testing (str "folding with n = " n)
(let [result (let [result
(r/fold n r/cat r/append! (r/fold n r/cat r/append!