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