comparison clojure/com/aurellem/gb_driver.clj @ 95:b74a578d0c88

working on inventory analysis
author Robert McIntyre <rlm@mit.edu>
date Sun, 11 Mar 2012 23:10:44 -0500
parents 612393a0d3a0
children cb487c4ce5c0
comparison
equal deleted inserted replaced
94:612393a0d3a0 95:b74a578d0c88
174 [& forms] 174 [& forms]
175 (let [fun-name (first forms)] 175 (let [fun-name (first forms)]
176 `(do 176 `(do
177 (defn ~@forms) 177 (defn ~@forms)
178 (alter-var-root (var ~fun-name) memoize)))) 178 (alter-var-root (var ~fun-name) memoize))))
179 179