Questions tagged [consing]
1 questions
5
votes
2 answers
Why does it cons so much?
When I run the following codes in SBCL (2.3.5), I am surprised by how much bytes consed.
(defun number-of-digits (num)
(do ((n 1 (1+ n))
(num (floor num 10) (floor num 10)))
((zerop num) n)))
(defun p25 ()
(do ((a 0 (+ a b))
…

xiepan
- 623
- 4
- 13