[Sbcl-commits] CVS: sbcl NEWS,1.427,1.428 package-data-list.lisp-expr,1.249,1.250 version.lisp-expr,1.1302,1.1303

[Alexey D. <ade...@us...>]

Update of /cvsroot/sbcl/sbcl
In directory sc8-pr-cvs1:/tmp/cvs-serv9989

Modified Files:
	NEWS package-data-list.lisp-expr version.lisp-expr 
Log Message:
0.8.4.22:
        * Fix problem reported by salex on #lisp: SLOT-VALUE was not
          known to return exactly one value.


Index: NEWS
===================================================================
RCS file: /cvsroot/sbcl/sbcl/NEWS,v
retrieving revision 1.427
retrieving revision 1.428
diff -u -d -r1.427 -r1.428
--- NEWS	13 Oct 2003 11:57:54 -0000	1.427
+++ NEWS	14 Oct 2003 07:31:04 -0000	1.428
@@ -2126,6 +2126,8 @@
     with values NIL and :ERROR.  (thanks to Milan Zamazal)
   * compiler enhancement: SIGNUM is now better able to derive the type
     of its result.
+  * type declarations inside WITH-SLOTS are checked.  (reported by
+    salex on #lisp)
   * fixed some bugs revealed by Paul Dietz' test suite:
     ** incorrect optimization of TRUNCATE for a positive first
        argument and negative second.

Index: package-data-list.lisp-expr
===================================================================
RCS file: /cvsroot/sbcl/sbcl/package-data-list.lisp-expr,v
retrieving revision 1.249
retrieving revision 1.250
diff -u -d -r1.249 -r1.250
--- package-data-list.lisp-expr	16 Sep 2003 12:07:39 -0000	1.249
+++ package-data-list.lisp-expr	14 Oct 2003 07:31:04 -0000	1.250
@@ -1925,7 +1925,7 @@
              "CATCH-BLOCK-ENTRY-PC-SLOT" "CATCH-BLOCK-PREVIOUS-CATCH-SLOT"
              "CATCH-BLOCK-SC-NUMBER" "CATCH-BLOCK-SIZE" "CATCH-BLOCK-SIZE-SLOT"
              "CATCH-BLOCK-TAG-SLOT" "CERROR-TRAP"
-             "CLOSURE-FUN-HEADER-WIDETAG" "CLOSURE-FUN-SLOT"
+             "CLOSURE-FUN-SLOT"
              "CLOSURE-HEADER-WIDETAG" "CLOSURE-INFO-OFFSET"
              "CODE-CODE-SIZE-SLOT" "CODE-CONSTANTS-OFFSET"
              "CODE-DEBUG-INFO-SLOT" "CODE-ENTRY-POINTS-SLOT"

Index: version.lisp-expr
===================================================================
RCS file: /cvsroot/sbcl/sbcl/version.lisp-expr,v
retrieving revision 1.1302
retrieving revision 1.1303
diff -u -d -r1.1302 -r1.1303
--- version.lisp-expr	13 Oct 2003 11:57:56 -0000	1.1302
+++ version.lisp-expr	14 Oct 2003 07:31:04 -0000	1.1303
@@ -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.4.21"
+"0.8.4.22"