Update of /project/elephant/cvsroot/elephant/src In directory common-lisp.net:/tmp/cvs-serv14714/src

Modified Files: metaclasses.lisp Log Message: Andrew Philpot found this bug that broke the ACL implementation

Date: Fri Jan 6 15:20:03 2006 Author: rread

Index: elephant/src/metaclasses.lisp diff -u elephant/src/metaclasses.lisp:1.8 elephant/src/metaclasses.lisp:1.9 --- elephant/src/metaclasses.lisp:1.8 Wed Nov 23 18:51:37 2005 +++ elephant/src/metaclasses.lisp Fri Jan 6 15:20:03 2006 @@ -77,7 +77,10 @@ ;; It probably would be better to put a string in here in the case ;; of sleepycat... (dbonnection-spec-pst :type (or list string) :accessor :dbcn-spc-pst :initarg :dbconnection-spec-pst - :initform '()) +;; Andrew Philpot discovered that this breaks the ACL implementation. +;; We are green under both SBCL and ACL with it commented out, so I am commiting it. -- rlr 06 JAN 2006 +;; :initform '() +) ) (:documentation "Abstract superclass for all persistent classes (common