1 Exception utilities
2 Number utilities
3 String utilities
4 Bytes utilities
5 Symbol utilities
6 List utilities
7 PLT 4x hash utilities
8 PLT 3x hash utilities
9 URL utilities
10 Contract utilities
11 File and path utilities
12 Parameter utilities
13 Syntax utilities
14 SRFI19 time utilities
15 Scribble utilities
16 Generators
17 Generators (short names)
18 Pipelines
19 Write-through cache
20 Yieldable procedures
21 Debugging tools
22 Profiling tools
23 Logging tools
On this page:
make-yieldable
yieldable
Version: 4.0.0.1

 

20 Yieldable procedures

 (require (planet untyped/unlib/yield))

Implements the "yield" operator of Ruby / Python using continuations. The "yield" command pauses the execution of a procedure and returns a result. Execution continues from the same point in the next invocation of the procedure (rather from the beginning of the procedure as usual).

Supports procedures with multiple arguments and return types.

Examples:

  > (define calc

      (make-yieldable

       (lambda (yield)

         (lambda (a b)

           (define-values (c d)

             (yield a b))

           (values (* c 2) (* d 2))))))

  > (calc 1 2)

  1

  2

  > (calc 1 2)

  2

  4

(make-yieldable yield->proc)  target-proc

  yield->proc : (yield-proc -> target-proc)

Creates a target procedure that can use yield-proc to suspend operation. yield-proc and target-proc have symmetric contracts:

yield-proc : a b c -> d e

target-proc : d e -> a b c

(yieldable yield-id expr ...)

A syntactic form of make-yieldable that avoids writing so many lambdas.

Examples:

  > (define calc

      (yieldable yield

        (lambda (a b)

          (define-values (c d)

            (yield a b))

          (values (* c 2) (* d 2)))))

  > (calc 1 2)

  1

  2

  > (calc 1 2)

  2

  4