Update of /cvsroot/sbcl/sbcl
In directory sc8-pr-cvs1:/tmp/cvs-serv23582
Modified Files:
Tag: pcl_class_defrobulation_branch
TODO.pcl-class package-data-list.lisp-expr version.lisp-expr
Log Message:
0.7.13.pcl-class.4
Fix CONDITION-CLASS regression from ansi-tests
... many thanks to Gerd Moellmann
... delete dead *FIND-STRUCTURE-CLASS* variable
... some parallel code for CONDITION-CLASS(OID) stuff
... frob ENSURE-CLASS-VALUES slightly to ensure it doesn't
automatically add on :DIRECT-SLOTS
Go back to not printing IDENTITY for named objects
... i.e. #<STANDARD-CLASS FOO> is enough, because there will
only ever (we hope) be one standard-class named FOO.
Index: TODO.pcl-class
===================================================================
RCS file: /cvsroot/sbcl/sbcl/Attic/TODO.pcl-class,v
retrieving revision 1.1.2.3
retrieving revision 1.1.2.4
diff -u -d -r1.1.2.3 -r1.1.2.4
--- TODO.pcl-class 21 Mar 2003 09:56:11 -0000 1.1.2.3
+++ TODO.pcl-class 21 Mar 2003 12:09:43 -0000 1.1.2.4
@@ -1,11 +1,3 @@
-** CONDITION-CLASS
-
-(find-class 'warning) gives an object of type STRUCTURE-CLASS.
-However, a WARNING is not a STRUCTURE-OBJECT, but a CONDITION-OBJECT,
-which contradicts the requirement that instances of STRUCTURE-CLASS be
-STRUCTURE-OBJECTs. Fix this, probably by teaching PCL about
-CONDITION-CLASS analogously to STRUCTURE-CLASS.
-
** CLASS-PROTOTYPE
[ fixed the (CLASS-PROTOTYPE (FIND-CLASS 'NULL)) issue; more general
@@ -19,4 +11,13 @@
** LEGAL-CLASS-NAME-P
-NIL is probably not a legal class name
+NIL is probably not a legal class name. Hmm, except that
+ (FIND-CLASS NIL NIL)
+still probably doesn't want to be an error (ASDF executes this
+internally, for a start).
+
+** DOCUMENTATION/DESCRIBE-OBJECT
+
+Can be done post-merge, but some of these methods talk about
+SB-KERNEL:CLASSOIDs rather than CL:CLASSes. Should be fixed to refer
+to user-relevant data, probably.
Index: package-data-list.lisp-expr
===================================================================
RCS file: /cvsroot/sbcl/sbcl/package-data-list.lisp-expr,v
retrieving revision 1.205.2.2
retrieving revision 1.205.2.3
diff -u -d -r1.205.2.2 -r1.205.2.3
--- package-data-list.lisp-expr 21 Mar 2003 09:27:12 -0000 1.205.2.2
+++ package-data-list.lisp-expr 21 Mar 2003 12:09:43 -0000 1.205.2.3
@@ -1342,6 +1342,7 @@
"%FUNCALLABLE-INSTANCE-FUN" "SYMBOL-HASH"
"BUILT-IN-CLASSOID"
+ "CONDITION-CLASSOID-P"
"MAKE-UNDEFINED-CLASSOID" "FIND-CLASSOID" "CLASSOID"
"CLASSOID-DIRECT-SUPERCLASSES" "MAKE-LAYOUT"
"REDEFINE-LAYOUT-WARNING" "SLOT-CLASSOID"
Index: version.lisp-expr
===================================================================
RCS file: /cvsroot/sbcl/sbcl/version.lisp-expr,v
retrieving revision 1.822.2.3
retrieving revision 1.822.2.4
diff -u -d -r1.822.2.3 -r1.822.2.4
--- version.lisp-expr 21 Mar 2003 09:56:12 -0000 1.822.2.3
+++ version.lisp-expr 21 Mar 2003 12:09:43 -0000 1.822.2.4
@@ -18,4 +18,4 @@
;;; versions, especially for internal versions off the main CVS
;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
-"0.7.13.pcl-class.3"
+"0.7.13.pcl-class.4"
-------------------------------------------------------
This sf.net email is sponsored by:ThinkGeek
Welcome to geek heaven.
http://thinkgeek.com/sf
|