Skip to content

Instantly share code, notes, and snippets.

View josh-7t's full-sized avatar

joshua degagné josh-7t

View GitHub Profile
@josh-7t
josh-7t / byte_streams_memo_benchmark.clj
Created October 13, 2021 19:13
Benchmarking byte-stream.util/fast-memoize against clojure.core/memoize
(ns byte-streams-memo-benchmark
(:require [metrics.core :refer [new-registry]]
[metrics.timers :as mt]
[byte-streams.utils :refer (fast-memoize)]))
(defn bench-memo [f]
(let [n 500
warmup-arg1 (repeatedly n #(rand-int (* 20 n)))
warmup-arg2 (repeatedly n #(rand-int (* 20 n)))
test-arg1 (repeatedly n #(rand-int (* 20 n)))