Fixed typo.

original commit: 12ce9abda6916bd590ac76666a6f3db4a63dd2f3
This commit is contained in:
Vincent St-Amour 2010-07-23 17:03:53 -04:00
parent a479e9d5e3
commit 5c75aa1793

View File

@ -22,7 +22,7 @@
#:with ((candidates ...) (others ...))
(let-values
(((candidates others)
;; clauses of form ((v) rhs), currently only suppose 1 lhs var
;; clauses of form ((v) rhs), currently only supports 1 lhs var
(partition (lambda (p)
(and (isoftype? (cadr p) -InexactComplex)
(let ((v (car (syntax-e (car p)))))