Clojure: magia floja

Question

Casi 2 programas idénticos para generar infinitos secesos perezosos de randoms. El primero no falla. El segundo bloqueo con la excepción OutOfMemoryError. ¿Por qué?

;Return infinite lazy sequence of random numbers  
(defn inf-rand[] (lazy-seq (cons (rand) (inf-rand))))  

;Never returns. Burns the CPU but won't crash and lives forever.  
(last (inf-rand)) 

Pero el siguiente choque con bastante rapidez:

;Return infinite lazy sequence of random numbers  
(defn inf-rand[] (lazy-seq (cons (rand) (inf-rand))))  
(def r1 (inf-rand)) 

;Crash with "OutOfMemoryError" 
(last r1) 

Answer 1

Creo que esto es un ejemplo de "la celebración en la cabeza".

Al hacer la referencia r1 en el segundo ejemplo, abre la posibilidad de decir algo más tarde como (first r1), por lo que terminará almacenando los miembros de su Lazy-Seq a medida que se reifican.

En el primer caso Clojure puede determinar que nunca se hará nada con los miembros anteriores de la secuencia infinita para que puedan eliminarse y no consumir memoria.

Todavía soy un principiante de Clojure, cualquier comentario o corrección de mi comprensión o terminología es muy apreciada.