13 lines
193 B
Plaintext
13 lines
193 B
Plaintext
;; Closure Scope Test
|
|
;; Benchmark: 55ns
|
|
;; Benchmark-Repeat: 36184
|
|
;; Output: 15
|
|
(do
|
|
(def make-adder (fn [x]
|
|
(fn [y] (+ x y))))
|
|
|
|
(def add5 (make-adder 5))
|
|
|
|
(add5 10)
|
|
)
|