Changeset 2640
- Timestamp:
- 03/03/08 09:49:33 (10 months ago)
- Files:
-
- trunk/bknr/datastore/src/data/object.lisp (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
trunk/bknr/datastore/src/data/object.lisp
r2610 r2640 532 532 (when (and (plusp created-objects) 533 533 (zerop (mod created-objects 10000))) 534 #+nil (format t "Snapshot position ~A~%" (file-position s))534 #+nil (format t "Snapshot position ~A~%" (file-position s)) 535 535 (format t "~A objects created.~%" created-objects) 536 536 (force-output))
