Fix typo.

diff --git a/src/runtime/lambda.scm b/src/runtime/lambda.scm
index 77da70ab408888f5455fb2d99a0b129b4ceba501..e583d001deba683a35579b89f6ce63c39e48ee36 100644 (file)
--- a/src/runtime/lambda.scm
+++ b/src/runtime/lambda.scm
@@ -411,7 +411,8 @@ USA.
        (make-lambda-list
        (subvector->list bound 1 (+ n-required 1))
        (subvector->list bound (+ n-required 1) (+ n-optional n-required 1))
-       (and rest? (vector-ref bound (+ n-optional n-required 1))))))))
+       (and rest? (vector-ref bound (+ n-optional n-required 1)))
+       '())))))
 
 (define (xlambda-name xlambda)
   (guarantee-xlambda xlambda 'xlambda-name)