0.6.11.23:
[sbcl.git] / src / compiler / x86 / alloc.lisp
index 9e74f3b..34a099c 100644 (file)
@@ -57,7 +57,7 @@
                      (t
                       (storew nil-value ptr cons-cdr-slot
                               list-pointer-type)))
-               (assert (null (tn-ref-across things)))))
+               (aver (null (tn-ref-across things)))))
             (move result res))))))
 
 (define-vop (list list-or-list*)