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