6 lines
92 B
Plaintext
6 lines
92 B
Plaintext
(defn make-adder [x]
|
|
(let [y x]
|
|
(fn [z] (+ y z))))
|
|
(def add2 (make-adder 2))
|
|
(add2 4)
|