Skip to content

Commit 022a1fd

Browse files
committed
Minor tweak to perf tests
Add another baseline test with a `PreparedStatement`.
1 parent 4a4bab0 commit 022a1fd

File tree

1 file changed

+8
-1
lines changed

1 file changed

+8
-1
lines changed

src/perf/clojure/clojure/java/perf_jdbc.clj

Lines changed: 8 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -14,6 +14,8 @@
1414
1515
$ clj -A:test:perf
1616
Clojure 1.9.0
17+
user=> (require '[clojure.java.perf-jdbc :as p])
18+
nil
1719
user=> (p/calibrate)
1820
...
1921
nil
@@ -140,11 +142,16 @@
140142
(assert (= "Apple" (select db)))
141143
(cc/quick-bench (select db)))
142144

145+
(println "Basic select first rs...")
146+
(let [db db]
147+
(cc/quick-bench (sql/query db ["SELECT * FROM fruit WHERE appearance = ?" "red"]
148+
{:result-set-fn first :qualifier "fruit"})))
149+
143150
(println "Select with prepared statement...")
144151
(let [con (:connection db)]
145152
(with-open [ps (sql/prepare-statement con "SELECT * FROM fruit WHERE appearance = ?")]
146153
(assert (= "Apple" (select-p db ps)))
147-
(cc/quick-bench (select db))))
154+
(cc/quick-bench (select-p db ps))))
148155

149156
(println "Reducible query...")
150157
(let [db db

0 commit comments

Comments
 (0)