chibi-scheme/lib/srfi/8.sld

9 lines
230 B
Scheme

(define-library (srfi 8)
(export receive)
(import (scheme))
(body
(define-syntax receive
(syntax-rules ()
((receive params expr . body)
(call-with-values (lambda () expr) (lambda params . body)))))))