Add benchmark to compare to vary-meta
This commit is contained in:
parent
fbb7a17197
commit
21e6289c64
1 changed files with 6 additions and 0 deletions
|
|
@ -219,3 +219,9 @@
|
||||||
300000
|
300000
|
||||||
(vector (meta data))
|
(vector (meta data))
|
||||||
(select META data)))
|
(select META data)))
|
||||||
|
|
||||||
|
(let [data (with-meta {:x 1} {:my :metadata})]
|
||||||
|
(run-benchmark "vary metadata"
|
||||||
|
300000
|
||||||
|
(vary-meta data assoc :y 2)
|
||||||
|
(setval [META :y] 2 data)))
|
||||||
|
|
|
||||||
Loading…
Reference in a new issue