🎉 Add blob encoding v3.

Safer approach (uses json instead of custom binary format) than v2.
This commit is contained in:
Andrey Antukh 2021-03-08 13:14:52 +01:00 committed by Andrés Moya
parent 99d9d77c63
commit 68d8a49466
3 changed files with 39 additions and 4 deletions

View file

@ -12,11 +12,12 @@
[app.common.exceptions :as ex]
[app.config :as cfg]
[app.main :as main]
[app.util.blob :as blob]
[app.util.json :as json]
[app.util.time :as dt]
[app.util.transit :as t]
[app.util.json :as json]
[clojure.java.io :as io]
[clojure.pprint :refer [pprint]]
[clojure.pprint :refer [pprint print-table]]
[clojure.repl :refer :all]
[clojure.spec.alpha :as s]
[clojure.spec.gen.alpha :as sgen]
@ -25,8 +26,7 @@
[clojure.tools.namespace.repl :as repl]
[clojure.walk :refer [macroexpand-all]]
[criterium.core :refer [quick-bench bench with-progress-reporting]]
[integrant.core :as ig]
[taoensso.nippy :as nippy]))
[integrant.core :as ig]))
(repl/disable-reload! (find-ns 'integrant.core))
@ -91,3 +91,10 @@
[]
(stop)
(repl/refresh-all :after 'user/start))
(defn compression-bench
[data]
(print-table
[{:v1 (alength (blob/encode data {:version 1}))
:v2 (alength (blob/encode data {:version 2}))
:v3 (alength (blob/encode data {:version 3}))}]))