;; Benchmark: 1.7ms
;; Benchmark-Repeat: 3
;; Tests the effect of record inlining and field lookup optimization
;; Output: 10000
(do
  (def config {:start 0 :limit 10000 :step 2})
  (def x (.start config))

  (while (< x (.limit config))
         (assign x (+ x (.step config))))
  x
)