0.8.2.36:
authorAlexey Dejneka <adejneka@comail.ru>
Sun, 17 Aug 2003 08:04:48 +0000 (08:04 +0000)
committerAlexey Dejneka <adejneka@comail.ru>
Sun, 17 Aug 2003 08:04:48 +0000 (08:04 +0000)
        * AVER was too early in the cross compiler.

src/code/cross-misc.lisp
version.lisp-expr

index e2fb124..d2a4c34 100644 (file)
 ;;; These functions are needed for constant-folding.
 (defun sb!kernel:simple-array-nil-p (object)
   (when (typep object 'array)
-    (aver (not (null (array-element-type object)))))
+    (assert (not (eq (array-element-type object) nil))))
   nil)
 
 (defun sb!kernel:%negate (number)
index 6377070..ec2a4a5 100644 (file)
@@ -17,4 +17,4 @@
 ;;; checkins which aren't released. (And occasionally for internal
 ;;; versions, especially for internal versions off the main CVS
 ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
-"0.8.2.35"
+"0.8.2.36"