無限再帰を止める方法

gistfile1.lisp

;;; 無限再帰を止める方法

(def foo (n)
  (prn n)
  (cl:sleep 1)
  (foo (+ 1 n)))


(foo 0)
;>>> 0
;>>> 1
...

;;; 再定義
(def foo (n))


;;; 止まる