From 5c75aa179336f5355273a76e3e254447ed416f40 Mon Sep 17 00:00:00 2001 From: Vincent St-Amour Date: Fri, 23 Jul 2010 17:03:53 -0400 Subject: [PATCH] Fixed typo. original commit: 12ce9abda6916bd590ac76666a6f3db4a63dd2f3 --- collects/typed-scheme/optimizer/unboxed-let.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/typed-scheme/optimizer/unboxed-let.rkt b/collects/typed-scheme/optimizer/unboxed-let.rkt index 40d11cdf..3dbc38ce 100644 --- a/collects/typed-scheme/optimizer/unboxed-let.rkt +++ b/collects/typed-scheme/optimizer/unboxed-let.rkt @@ -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)))))