Add raw Java benchmark

This commit is contained in:
Sean Corfield 2019-01-26 00:27:15 -08:00
parent c1e8b351a2
commit a1d9d869d6

View file

@ -456,6 +456,17 @@
;; calibrate ;; calibrate
(quick-bench (reduce + (take 10e6 (range)))) (quick-bench (reduce + (take 10e6 (range))))
;; raw java
(defn select* [^Connection con]
(let [ps (doto (.prepareStatement con "SELECT * FROM fruit WHERE appearance = ?")
(.setObject 1 "red"))
rs (.executeQuery ps)
_ (.next rs)
value (.getObject rs "name")]
(.close ps)
value))
(quick-bench (select* con))
;; same as the Java example in java.jdbc perf test ;; same as the Java example in java.jdbc perf test
(quick-bench (quick-bench
(reduce (fn [rs m] (reduced (:name m))) (reduce (fn [rs m] (reduced (:name m)))