From 21e6289c64e7ee2e3adba467f70f26ded65d5c94 Mon Sep 17 00:00:00 2001
From: Alex Engelberg <alex.benjamin.engelberg@gmail.com>
Date: Wed, 8 Jun 2016 08:25:03 -0700
Subject: [PATCH] Add benchmark to compare to vary-meta

---
 scripts/benchmarks.clj | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/scripts/benchmarks.clj b/scripts/benchmarks.clj
index f82bcd5..98cd979 100644
--- a/scripts/benchmarks.clj
+++ b/scripts/benchmarks.clj
@@ -219,3 +219,9 @@
     300000
     (vector (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)))