Author: ksprotte Date: Mon Jan 21 07:38:57 2008 New Revision: 2373
Modified: branches/bos/bknr/src/data/object.lisp Log: !! crucial ch to BKNR.DATASTORE (object.lisp): (INITIALIZE-PERSISTENT-INSTANCE obj) is now always called (independently of the store-state).
The result is that it will also be called inside LOAD-TRANSACTION-LOG.
As TX-MAKE-OBJECT (being a transaction) is never called when restoring the object subsystem snapshot, the former check with unless
(unless (eq (store-state *store*) :restore) (initialize-persistent-instance obj))
seems to be not needed / useful.
Modified: branches/bos/bknr/src/data/object.lisp ============================================================================== --- branches/bos/bknr/src/data/object.lisp (original) +++ branches/bos/bknr/src/data/object.lisp Mon Jan 21 07:38:57 2008 @@ -571,8 +571,7 @@ (if restoring (remove-transient-slot-initargs (find-class class-name) initargs) initargs))) - (unless restoring - (initialize-persistent-instance obj)) + (initialize-persistent-instance obj) (initialize-transient-instance obj) (setf error nil) obj)