mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-06-08 03:45:04 +02:00
10 lines
240 B
Text
10 lines
240 B
Text
|
|
(define-module (srfi 8)
|
|
(export receive)
|
|
(import-immutable (scheme))
|
|
(body
|
|
(define-syntax receive
|
|
(syntax-rules ()
|
|
((receive params expr . body)
|
|
(call-with-values (lambda () expr) (lambda params . body)))))))
|
|
|