luciano/nippy
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

[nop] Clean up stress-data

Browse source
This commit is contained in:
Peter Taoussanis 2022-07-01 10:10:54 +02:00
parent 3e928a9d33
commit b10a0bf653
2 changed files with 33 additions and 37 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

37
README.md
View file

@ -80,40 +80,41 @@ nippy/stress-data
:regex #"^(https?:)?//(www\?|\?)?" :regex #"^(https?:)?//(www\?|\?)?"
:queue (-> (PersistentQueue/EMPTY) (conj :a :b :c :d :e :f :g)) :many-small-numbers (vec (range 200))
:queue-empty (PersistentQueue/EMPTY) :many-small-keywords (->> (java.util.Locale/getISOLanguages)
(mapv keyword))
:many-small-strings (->> (java.util.Locale/getISOCountries)
(mapv #(.getDisplayCountry (java.util.Locale. "en" %))))
:queue (enc/queue [:a :b :c :d :e :f :g])
:queue-empty (enc/queue) :queue-empty (enc/queue)
:sorted-set (sorted-set 1 2 3 4 5) :sorted-set (sorted-set 1 2 3 4 5)
:sorted-map (sorted-map :b 2 :a 1 :d 4 :c 3) :sorted-map (sorted-map :b 2 :a 1 :d 4 :c 3)
:list (list 1 2 3 4 5 (list 6 7 8 (list 9 10))) :list (list 1 2 3 4 5 (list 6 7 8 (list 9 10 '(()))))
:list-quoted '(1 2 3 4 5 (6 7 8 (9 10))) :vector [1 2 3 4 5 [6 7 8 [9 10 [[]]]]]
:list-empty (list) :map {:a 1 :b 2 :c 3 :d {:e 4 :f {:g 5 :h 6 :i 7 :j {{} {}}}}}
:vector [1 2 3 4 5 [6 7 8 [9 10]]] :set #{1 2 3 4 5 #{6 7 8 #{9 10 #{#{}}}}}
:vector-empty []
:map {:a 1 :b 2 :c 3 :d {:e 4 :f {:g 5 :h 6 :i 7}}}
:map-empty {}
:set #{1 2 3 4 5 #{6 7 8 #{9 10}}}
:set-empty #{}
:meta (with-meta {:a :A} {:metakey :metaval}) :meta (with-meta {:a :A} {:metakey :metaval})
:nested [#{{1 [:a :b] 2 [:c :d] 3 [:e :f]} [] #{:a :b}} :nested [#{{1 [:a :b] 2 [:c :d] 3 [:e :f]} [#{{}}] #{:a :b}}
#{{1 [:a :b] 2 [:c :d] 3 [:e :f]} [] #{:a :b}} #{{1 [:a :b] 2 [:c :d] 3 [:e :f]} [#{{}}] #{:a :b}}
[1 [1 2 [1 2 3 [1 2 3 4 [1 2 3 4 5]]]]]] [1 [1 2 [1 2 3 [1 2 3 4 [1 2 3 4 5]]]]]]
:lazy-seq (repeatedly 1000 rand) :lazy-seq (repeatedly 1000 rand)
:lazy-seq-empty (map identity '()) :lazy-seq-empty (map identity '())
:byte (byte 16) :byte (byte 16)
:short (short 42) :short (short 42)
:integer (int 3) :integer (int 3)
:long (long 3) :long (long 3)
:bigint (bigint 31415926535897932384626433832795) :bigint (bigint 31415926535897932384626433832795)
:float (float 3.14) :float (float 3.14)
:double (double 3.14) :double (double 3.14)
:bigdec (bigdec 3.1415926535897932384626433832795) :bigdec (bigdec 3.1415926535897932384626433832795)
:ratio 22/7 :ratio 22/7
:uri (URI. "https://clojure.org/reference/data_structures")
:uuid (java.util.UUID/randomUUID) :uuid (java.util.UUID/randomUUID)
:date (java.util.Date.) :date (java.util.Date.)

33
src/taoensso/nippy.clj
View file

@ -2016,9 +2016,9 @@
;;;; Stress data ;;;; Stress data
(defrecord StressRecord [data]) (defrecord StressRecord [my-data])
(deftype StressType [data] (deftype StressType [my-data]
Object (equals [a b] (= (.-data a) (.-data ^StressType b)))) Object (equals [a b] (= (.-my-data a) (.-my-data ^StressType b))))
(def stress-data "Reference data used for tests & benchmarks" (def stress-data "Reference data used for tests & benchmarks"
{:nil nil {:nil nil
@ -2044,29 +2044,24 @@
:regex #"^(https?:)?//(www\?|\?)?" :regex #"^(https?:)?//(www\?|\?)?"
;;; Try reflect real-world data: ;;; Try reflect real-world data:
:lotsa-small-numbers (vec (range 200)) :many-small-numbers (vec (range 200))
:lotsa-small-keywords (->> (java.util.Locale/getISOLanguages) :many-small-keywords (->> (java.util.Locale/getISOLanguages)
(mapv keyword)) (mapv keyword))
:lotsa-small-strings (->> (java.util.Locale/getISOCountries) :many-small-strings (->> (java.util.Locale/getISOCountries)
(mapv #(.getDisplayCountry (java.util.Locale. "en" %)))) (mapv #(.getDisplayCountry (java.util.Locale. "en" %))))
:queue (enc/queue [:a :b :c :d :e :f :g]) :queue (enc/queue [:a :b :c :d :e :f :g])
:queue-empty (enc/queue) :queue-empty (enc/queue)
:sorted-set (sorted-set 1 2 3 4 5) :sorted-set (sorted-set 1 2 3 4 5)
:sorted-map (sorted-map :b 2 :a 1 :d 4 :c 3) :sorted-map (sorted-map :b 2 :a 1 :d 4 :c 3)
:list (list 1 2 3 4 5 (list 6 7 8 (list 9 10))) :list (list 1 2 3 4 5 (list 6 7 8 (list 9 10 '(()))))
:list-quoted '(1 2 3 4 5 (6 7 8 (9 10))) :vector [1 2 3 4 5 [6 7 8 [9 10 [[]]]]]
:list-empty (list) :map {:a 1 :b 2 :c 3 :d {:e 4 :f {:g 5 :h 6 :i 7 :j {{} {}}}}}
:vector [1 2 3 4 5 [6 7 8 [9 10]]] :set #{1 2 3 4 5 #{6 7 8 #{9 10 #{#{}}}}}
:vector-empty []
:map {:a 1 :b 2 :c 3 :d {:e 4 :f {:g 5 :h 6 :i 7}}}
:map-empty {}
:set #{1 2 3 4 5 #{6 7 8 #{9 10}}}
:set-empty #{}
:meta (with-meta {:a :A} {:metakey :metaval}) :meta (with-meta {:a :A} {:metakey :metaval})
:nested [#{{1 [:a :b] 2 [:c :d] 3 [:e :f]} [] #{:a :b}} :nested [#{{1 [:a :b] 2 [:c :d] 3 [:e :f]} [#{{}}] #{:a :b}}
#{{1 [:a :b] 2 [:c :d] 3 [:e :f]} [] #{:a :b}} #{{1 [:a :b] 2 [:c :d] 3 [:e :f]} [#{{}}] #{:a :b}}
[1 [1 2 [1 2 3 [1 2 3 4 [1 2 3 4 5]]]]]] [1 [1 2 [1 2 3 [1 2 3 4 [1 2 3 4 5]]]]]]
:lazy-seq (repeatedly 1000 rand) :lazy-seq (repeatedly 1000 rand)