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

  (while (< x (.limit config))
         (assign x (+ x (.step config))))
  (assert-eq 10000 x)
)