diff options
Diffstat (limited to 'srfi-8.scm')
-rw-r--r-- | srfi-8.scm | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/srfi-8.scm b/srfi-8.scm new file mode 100644 index 0000000..049451f --- /dev/null +++ b/srfi-8.scm @@ -0,0 +1,14 @@ +;;"srfi-8.scm": RECEIVE: Binding to multiple values + +(require 'values) + +;;@code{(require 'srfi-8)} +;;@ftindex srfi-8 + +;;@body +;;@url{http://srfi.schemers.org/srfi-8/srfi-8.html} +(define-syntax receive + (syntax-rules () + ((receive formals expression body ...) + (call-with-values (lambda () expression) + (lambda formals body ...))))) |