Update record_unpack example

This commit is contained in:
Michael Schimmel
2026-02-20 17:18:45 +01:00
parent 9072cfaa14
commit 772a0fb8ab
+6 -15
View File
@@ -1,20 +1,11 @@
;; Benchmark: Record Destructuring Performance
;; This test calls a function that destructures a record 100.000 times.
;; This test calls a function that destructures a record
;; Current implementation is now zero-allocation for destructuring.
;; Output: {:a 1, :b 2}
;; Benchmark: 5.2ms
;; Output: 3
;; Benchmark: 775ns
;; Benchmark-Repeat: 2587
(do
(def process (fn [[x y]]
(+ x y)))
(def rec {:a 1 :b 2})
(def loop (fn [n acc]
(if (= n 0)
acc
(loop (- n 1) (process rec)))))
(loop 10000 0)
rec
(def process (fn [[x y]]
(+ x y)))