; Start this script with `csi -:D` to observe heap resizing

(use lazy-seq)

(define (complex-stream time)
  (lazy-map identity time))


; This seems to leak:

(lazy-each
  void
  (complex-stream
      (lazy-numbers)))


; This doesn't:

#;(lazy-each
  void
  (lazy-map
    identity
    (lazy-numbers)))