update tail-call.scm

This commit is contained in:
Yuichi Nishiwaki 2014-02-06 14:23:04 +09:00
parent 66ac29519e
commit a512ef79f8
1 changed files with 2 additions and 0 deletions

View File

@ -11,3 +11,5 @@
(if (zero? n) (if (zero? n)
0 0
(apply zero-2 (list (- n 1))))) (apply zero-2 (list (- n 1)))))
(zero-2 100000)