X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcode%2Fdebug-int.lisp;h=38dcf429bd0d5638dfe17fdd1640ddcd75d9e24d;hb=18c093eb771c1ab038090863d99bf4baf4224966;hp=e8a188d31f00afa16e6134c281c9ba5306664a7f;hpb=34f08eca171fca180a1d75c35c86816acf20a375;p=sbcl.git

diff --git a/src/code/debug-int.lisp b/src/code/debug-int.lisp
index e8a188d..38dcf42 100644
--- a/src/code/debug-int.lisp
+++ b/src/code/debug-int.lisp
@@ -2656,7 +2656,6 @@ register."
              (let ((count-var (fourth bind)))
                (specs `(,name (multiple-value-list
                                (sb!c:%more-arg-values (debug-var-value ',var ,n-frame)
-                                                      0
                                                       (debug-var-value ',count-var ,n-frame)))))))
             (:unknown
              (specs `(,name (debug-signal 'invalid-value