我正在使用 Clojure 1.5.1。这是我的程序:
(def bricks4
(memoize (fn [n]
(cond (> 0 n) 0
(= 0 n) 1
(= 1 n) 1
:else (+ (bricks4 (- n 1))
(bricks4 (- n 2))
(bricks4 (- n 3))
(bricks4 (- n 4)))))))
(bricks4 70) 抛出异常:
ArithmeticException integer overflow clojure.lang.Numbers.throwIntOverflow (Numbers.java:1388)
我很困惑,因为我认为 Clojure 会自动将数字从 Integer 提升到 Long 再到 BigDemical。
我应该怎么做才能修复这个程序?