add a comment

This commit is contained in:
Yuichi Nishiwaki 2013-12-10 03:14:08 -08:00
parent cb43c9f35d
commit d1752bb236
1 changed files with 2 additions and 0 deletions

View File

@ -282,6 +282,8 @@
s
(fold f (f (car xs) s) (cdr xs))))
;;; multiple value
(define (values . args)
(if (and (pair? args)
(null? (cdr args)))