From 0c4c4369a2e41e3c9311a32d4eb64d02234c9860 Mon Sep 17 00:00:00 2001 From: Nathan Marz Date: Thu, 9 Jun 2016 17:32:40 -0400 Subject: [PATCH] eliminate compiler performance warning regarding case --- src/clj/com/rpl/specter/impl.cljx | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/clj/com/rpl/specter/impl.cljx b/src/clj/com/rpl/specter/impl.cljx index 56aa909..ffddf99 100644 --- a/src/clj/com/rpl/specter/impl.cljx +++ b/src/clj/com/rpl/specter/impl.cljx @@ -544,7 +544,8 @@ (assoc v 0 (afn val)) )) (update-last [v afn] - (let [c (vec-count v)] + ;; type-hinting vec-count to ^int caused weird errors with case + (let [c (int (vec-count v))] (case c 1 (let [[e] v] [(afn e)]) 2 (let [[e1 e2] v] [e1 (afn e2)])