12 lines
167 B
Plaintext
12 lines
167 B
Plaintext
;; Closure Scope Test
|
|
;; Benchmark: 9.0us
|
|
;; Output: 15
|
|
(do
|
|
(def make-adder (fn [x]
|
|
(fn [y] (+ x y))))
|
|
|
|
(def add5 (make-adder 5))
|
|
|
|
(add5 10)
|
|
)
|