[gambit-list] gcc stage timing

Christian christian at pflanze.mine.nu
Tue Oct 17 14:55:33 EDT 2006


At 20:37 Uhr +0200 17.10.2006, I wrote:
>...

Or let the user provide the stop value:

(define (make-lazy generator #!optional nothing)
    (let lp ()
       (delay
          (let ((value (generator exit)))
            (if (eq? value nothing)
                '()
                (cons value
                      (lp)))))))

Christian.



More information about the Gambit-list mailing list