ikarus/lab/SRFI-8.ss

11 lines
315 B
Scheme
Raw Normal View History

2007-05-11 23:43:36 -04:00
(library (SRFI-8)
(export receive)
(import (ikarus))
;;; these SRFIs are great for filling your "features"
;;; page
(define-syntax receive
(syntax-rules ()
((receive formals expression body body* ...)
(call-with-values (lambda () expression)
(lambda formals body body* ...))))))