From: Christophe R. <cr...@us...> - 2003-04-23 17:05:33
|
Update of /cvsroot/sbcl/sbcl In directory sc8-pr-cvs1:/tmp/cvs-serv17294 Modified Files: NEWS version.lisp-expr Log Message: 0.pre8.98: Fix for MEMBER type (as per cmucl-imp 2003-04-23) ... (MEMBER 0.0) is not the same as (SINGLE-FLOAT 0.0 0.0); ... (MEMBER 0.0 -0.0) is the same as (SINGLE-FLOAT 0.0 0.0) ... (NOT (MEMBER 0.0)) needs to be (OR (NOT SINGLE-FLOAT) (SINGLE-FLOAT * (0.0)) (MEMBER -0.0) (SINGLE-FLOAT (0.0))); ... add some tests for this one. In the process of this fix, make -0.0 and -0.0d0 dumpable by the cross-compiler: ... more special cases in src/code/cross-float.lisp. And also let an :SB-SHOW build proceed to the end ... don't try to print the slots of PCL objects. Index: NEWS =================================================================== RCS file: /cvsroot/sbcl/sbcl/NEWS,v retrieving revision 1.286 retrieving revision 1.287 diff -u -d -r1.286 -r1.287 --- NEWS 22 Apr 2003 15:10:59 -0000 1.286 +++ NEWS 23 Apr 2003 17:04:52 -0000 1.287 @@ -1668,6 +1668,9 @@ this you were probably losing anyway. * sb-aclrepl module improvements: an integrated inspector, added repl features, and a bug fix to :trace command. + * fixed bug in MEMBER type: (MEMBER 0.0) is not the same as + (SINGLE-FLOAT 0.0 0.0), because of the existence of -0.0 which is + TYPEP the latter but not the former. * fixed some bugs revealed by Paul Dietz' test suite: ** COPY-ALIST now signals an error if its argument is a dotted list; Index: version.lisp-expr =================================================================== RCS file: /cvsroot/sbcl/sbcl/version.lisp-expr,v retrieving revision 1.920 retrieving revision 1.921 diff -u -d -r1.920 -r1.921 --- version.lisp-expr 23 Apr 2003 16:36:21 -0000 1.920 +++ version.lisp-expr 23 Apr 2003 17:04:55 -0000 1.921 @@ -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.pre8.97" +"0.pre8.98" |