From 38bac42d9d8326497b7e591e400b3dba1e51017b Mon Sep 17 00:00:00 2001
From: Matthias Andreas Benkard <code@mail.matthias.benkard.de>
Date: Sat, 20 Jul 2013 17:22:45 +0200
Subject: LAMBDA: Handle dynamically bound &REST arguments correctly.

---
 sb-eval2.lisp | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/sb-eval2.lisp b/sb-eval2.lisp
index d80b17b..ed24380 100644
--- a/sb-eval2.lisp
+++ b/sb-eval2.lisp
@@ -627,6 +627,14 @@
                         rest
                           (assert (null my-default-values*)
                                   (my-default-values*))
+                          (when (>= i (the fixnum
+                                           (1+ (the fixnum
+                                                    (+ required-num
+                                                       (the fixnum
+                                                            (+ optional-num
+                                                               key-num))
+                                                       aux-num)))))
+                            (go final-call))
                           (when restp
                             (push-args rest))
                         final-call
-- 
cgit v1.2.3