(define (lazyseq-with-stream) (list->stream (iota max)))
This is wrong.
It must be implemented as:
(define-stream (lazyseq-with-stream)
(stream-let loop ((v 1))
(stream-cons v (loop (+ 1 v)))))
I get the same segfault with the following error:
Too many heap sections: Increase MAXHINCR or MAX_HEAP_SECTS
