Clojure垃圾函数系列-「letfn」
发布于 8 08, 2018 by ThinkCat.

;;样例1
(letfn [(plus [x] (+ 2 x)) (gg [y] (- 22 y))]
  ;;do something with plus and gg
  (+ (plus 11) (gg 2))
  )
;; result: 33

;;样例2
(defn do-something [item]
  ;;do something using letfn
  (letfn [(eat [x] (println "eat:" x))
	  (sleep [y] (println "sleep:" y))]
    ;;do
    (eat item)
    (sleep item)
    )
  )
(do-something "hehe")

;;result: nil
;;打印以下内容:
;; eat: hehe
;; sleep: hehe