Skip to content

Commit a8eb147

Browse files
committed
Use LazilyPersistentVector/createOwning instead of (vec)
(vec) is a polymorphic method
1 parent 0769170 commit a8eb147

File tree

1 file changed

+9
-9
lines changed

1 file changed

+9
-9
lines changed
Lines changed: 9 additions & 9 deletions
Original file line numberDiff line numberDiff line change
@@ -1,21 +1,21 @@
11
(ns simple-stress-test-converter
22
(:require [aux :as a]
3-
[clojure.edn :as edn]
4-
[metrics :as m])
5-
(:import [org.fressian.handlers ConvertList ILookup]))
3+
[clojure.edn :as edn])
4+
(:import [clojure.lang LazilyPersistentVector]
5+
[org.fressian.handlers ConvertList ILookup])
6+
(:gen-class))
7+
8+
(def list-converter (reify ConvertList
9+
(convertList [_ items]
10+
(LazilyPersistentVector/createOwning items))))
611

712
(def custom-read-handlers
813
(reify ILookup
914
(valAt [_ k]
10-
(get {"fressian/list"
11-
(reify ConvertList
12-
(convertList [_ items]
13-
(vec items)))}
14-
k))))
15+
(get {"fressian/list" list-converter} k))))
1516

1617
(defn -main [& args]
1718
(let [parsed-args (map edn/read-string args)
1819
argmap (zipmap [:struct-type :struct-size :convert-list?] parsed-args)]
19-
(m/initialize-and-return-metrics)
2020
(a/stress-test argmap custom-read-handlers)
2121
(System/exit 0)))

0 commit comments

Comments
 (0)