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

Implement and test assoc on a row

Browse source
This commit is contained in:
Sean Corfield 2019-01-10 13:16:14 -08:00
parent 5cb185f16e
commit 01a13fe4fa
1 changed files with 6 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
src/next/jdbc.clj
View file

@ -369,8 +369,8 @@
(try
(clojure.lang.MapEntry. k (.getObject rs (name k)))
(catch SQLException _)))
(assoc [this _ _]
(throw (ex-info "assoc not supported on raw result set" {})))
(assoc [this k v]
(assoc (into {} (seq this)) k v))
clojure.lang.Seqable
(seq [this]
@ -448,4 +448,7 @@
(quick-bench
(reduce (fn [rs m] (reduced (into {} m)))
nil
(execute! con ["select * from fruit where appearance = ?" "red"]))))
(execute! con ["select * from fruit where appearance = ?" "red"])))
(reduce (fn [rs m] (reduced (assoc m :test :value)))
nil
(execute! con ["select * from fruit where appearance = ?" "red"])))