luciano/honeysql
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

make SqlArray a record too

Browse source
This commit is contained in:
Mike Blume 2015-04-15 09:53:15 -07:00
parent e047829046
commit 441c109b65
1 changed files with 2 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
src/honeysql/types.clj
View file

@ -60,18 +60,12 @@
;;;;
(deftype SqlArray [values _meta]
Object
(hashCode [this] (hash-combine (hash (class this)) (hash values)))
(equals [_ x] (and (instance? SqlArray x) (= values (.values ^SqlArray x))))
clojure.lang.IObj
(meta [_] _meta)
(withMeta [_ m] (SqlArray. values m)))
(defrecord SqlArray [values])
(defn array
"Represents a SQL array."
[values]
(SqlArray. values nil))
(SqlArray. values))
(defn array-vals [^SqlArray a]
(.values a))