mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-05-20 14:19:18 +02:00
10 lines
230 B
Text
10 lines
230 B
Text
|
|
(define-module (srfi 8)
|
|
(export receive)
|
|
(import (scheme))
|
|
(body
|
|
(define-syntax receive
|
|
(syntax-rules ()
|
|
((receive params expr . body)
|
|
(call-with-values (lambda () expr) (lambda params . body)))))))
|
|
|