From 2e247e6fd62327574c97c4e0dbf1e8117e17ab93 Mon Sep 17 00:00:00 2001 From: Joe Marshall Date: Sat, 11 Feb 2012 17:41:01 -0800 Subject: [PATCH] Avoid creating extended-lambdas just because of aux vars. --- src/runtime/lambda.scm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/src/runtime/lambda.scm b/src/runtime/lambda.scm index e583d001d..551957a73 100644 --- a/src/runtime/lambda.scm +++ b/src/runtime/lambda.scm @@ -487,8 +487,7 @@ USA. (cond ((and (< (length required) 256) (< (length optional) 256) (or (not (null? optional)) - rest - (not (null? auxiliary)))) + rest)) (make-xlambda name required optional rest auxiliary body*)) ((not (null? optional)) (error "Optionals not implemented" 'MAKE-LAMBDA)) -- 2.25.1