Update of /project/cl-store/cvsroot/cl-store In directory common-lisp.net:/tmp/cvs-serv2864
Modified Files: package.lisp store.lisp Log Message: spelling error again.
Date: Sat Jun 5 03:26:37 2004 Author: sross
Index: cl-store/package.lisp diff -u cl-store/package.lisp:1.5 cl-store/package.lisp:1.6 --- cl-store/package.lisp:1.5 Fri Jun 4 07:03:46 2004 +++ cl-store/package.lisp Sat Jun 5 03:26:37 2004 @@ -58,7 +58,7 @@ class-direct-superclasses class-slots ensure-class) - #+cmu (:shadowing-import-form :pcl + #+cmu (:shadowing-import-from :pcl standard-class class-of)
Index: cl-store/store.lisp diff -u cl-store/store.lisp:1.3 cl-store/store.lisp:1.4 --- cl-store/store.lisp:1.3 Fri May 21 07:14:40 2004 +++ cl-store/store.lisp Sat Jun 5 03:26:37 2004 @@ -8,6 +8,10 @@
TODO: ===== +- specify types when registering new types. + +- Add some sort of backend choosing mechanism. + - Add some sort of EOF mechanism.
- add support for working directly with an implementations @@ -249,7 +253,7 @@ ;; According to the notes for eq in the CLHS, ;; Common Lisp makes no guarantee that eq is true even when both ;; its arguments are the 'same thing' if that thing is a character or number. -;; but we attempt to handle it for anything thats not an integer. +;; so we don't worry about it (defun integer-or-symbolp (code) (member code `(,(lookup-type 'integer) ,(lookup-type 'symbol)