From efa56eca73501a1d50083ee8602764e27f1f2100 Mon Sep 17 00:00:00 2001 From: Peter Taoussanis Date: Wed, 7 Aug 2013 16:27:30 +0700 Subject: [PATCH] Use `tools.reader.edn` in benchmarks --- src/taoensso/nippy/benchmarks.clj | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/src/taoensso/nippy/benchmarks.clj b/src/taoensso/nippy/benchmarks.clj index 23581c1..9abdf91 100644 --- a/src/taoensso/nippy/benchmarks.clj +++ b/src/taoensso/nippy/benchmarks.clj @@ -1,6 +1,7 @@ (ns taoensso.nippy.benchmarks {:author "Peter Taoussanis"} - (:require [taoensso.nippy :as nippy :refer (freeze thaw)] + (:require [clojure.tools.reader.edn :as edn] + [taoensso.nippy :as nippy :refer (freeze thaw)] [taoensso.nippy.utils :as utils])) ;; Remove stuff from stress-data that breaks reader @@ -9,7 +10,7 @@ (defmacro bench* [& body] `(utils/bench 10000 (do ~@body) :warmup-laps 2000)) (defn freeze-reader [x] (binding [*print-dup* false] (pr-str x))) -(defn thaw-reader [x] (binding [*read-eval* false] (read-string x))) +(defn thaw-reader [x] (edn/read-string x)) (def roundtrip-reader (comp thaw-reader freeze-reader)) (def roundtrip-defaults (comp thaw freeze))