scheme-rs 0.2.0

Embedded scheme for the Rust ecosystem
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

(library (generators (1))
  (export yield generator)
  (import (rnrs) (prompts))

  (define generator-prompt-tag (gensym))

  (define (yield . args)
    (apply abort-to-prompt (cons generator-prompt-tag args)))

  (define (generator func)
    (lambda ()
      (call-with-prompt
       generator-prompt-tag
       func
       (lambda (k . returned)
         (set! func k)
         (apply values returned))))))