X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fstack.lisp;h=b2b8a11d34583155f33da6e1d611061595d4bae0;hb=94ea2b2082deaa0331dfb66fa6af6ca12dd8dc83;hp=fccf4f8a8db902d340cf0acfa4b94b0cb097d5ce;hpb=8902b8b6bd2e9285749dd39d313b33b6c69c5213;p=sbcl.git

diff --git a/src/compiler/stack.lisp b/src/compiler/stack.lisp
index fccf4f8..b2b8a11 100644
--- a/src/compiler/stack.lisp
+++ b/src/compiler/stack.lisp
@@ -96,7 +96,6 @@
                          (let* ((generator (lvar-use lvar))
                                 (block (node-block generator))
                                 (2block (block-info block)))
-                           (aver (eq generator (block-last block)))
                            ;; DX objects, living in the LVAR, are
                            ;; alive in the environment, protected by
                            ;; the CLEANUP. We also cannot move them