Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (define (iteration return)
- (each
- (lambda (element)
- (set! return (call-with-current-continuation
- (lambda (resume-point)
- (set! iteration resume-point)
- (return element)))))
- table)
- (return #f))
Add Comment
Please, Sign In to add comment