Author: hhubner Date: 2007-11-14 02:13:33 -0500 (Wed, 14 Nov 2007) New Revision: 2278
Modified: branches/trunk-reorg/bknr/datastore/src/data/txn.lisp Log: Add :SHARING :LOCK to transaction log stream open args so that it can be used by multiple threads.
Modified: branches/trunk-reorg/bknr/datastore/src/data/txn.lisp =================================================================== --- branches/trunk-reorg/bknr/datastore/src/data/txn.lisp 2007-11-14 07:00:51 UTC (rev 2277) +++ branches/trunk-reorg/bknr/datastore/src/data/txn.lisp 2007-11-14 07:13:33 UTC (rev 2278) @@ -177,7 +177,8 @@ :element-type '(unsigned-byte 8) :direction :output :if-does-not-exist :create - :if-exists :append))))) + :if-exists :append + #+openmcl :sharing #+openmcl :lock)))))
(defmethod close-transaction-log-stream ((store store)) (with-slots (transaction-log-stream) store