Re: [ANN] New library stream.el in ELPA

[Michael Heerdegen]

Nicolas Petton <address@hidden> writes:

> If you do stream it, using `stream-first' and `stream-rest' for
> instance, you shouldn't have this issue, right?

I don't remember.  Maybe your implementation is cleverer than mine was
;-)

I tried this stress test with your lib:

--8<---------------cut here---------------start------------->8---
(defun stream-append (s1 s2)
  (if (stream-empty-p s1) s2
      (stream-cons
       (stream-first s1)
       (stream-append (stream-rest s1) s2))))

(seq-elt (stream-append
          (stream (cl-loop for i from 1 to 100 collect i))
          (seq-filter
           #'cl-oddp
           (stream-append
            (stream (cl-loop for i from 1 to 50000 collect i))
            (seq-map #'1+ (stream (cl-loop for i from 50001 to 100001 collect 
i))))))
         40000)
--8<---------------cut here---------------end--------------->8---

What can I say - it work well!

BTW, is `stream-append' missing in your library, or should that be done
via some `seq' function?


Regards,

Michael.