Codebase list slib / cme/main srfi-8.scm
cme/main

Tree @cme/main (Download .tar.gz)

srfi-8.scm @cme/main — raw · history · blame 

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
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 ...)))))