From cea505484a08d839b7a2df5d530986c3d57ac937 Mon Sep 17 00:00:00 2001 From: Peter Taoussanis Date: Thu, 17 Sep 2015 18:51:29 +0700 Subject: [PATCH] Note re double vestigial kvs length --- src/taoensso/nippy.clj | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/taoensso/nippy.clj b/src/taoensso/nippy.clj index 5bb251d..9ee0bfb 100644 --- a/src/taoensso/nippy.clj +++ b/src/taoensso/nippy.clj @@ -215,7 +215,7 @@ (defmacro ^:private freezer-kvs [type id & body] `(freezer ~type ~id - (.writeInt ~'out (* 2 (count ~'x))) + (.writeInt ~'out (* 2 (count ~'x))) ; *2 here is vestigial (encore/backport-run! (fn [kv#] (freeze-to-out ~'out (key kv#)) @@ -452,7 +452,7 @@ (defmacro ^:private read-kvs [in coll] `(let [in# ~in] - (encore/repeatedly-into* ~coll (quot (.readInt in#) 2) + (encore/repeatedly-into* ~coll (quot (.readInt in#) 2) ; /2 here is vestigial [(thaw-from-in in#) (thaw-from-in in#)]))) (def ^:private class-method-sig (into-array Class [IPersistentMap]))