--- a/ObjMem.st	Mon May 20 10:40:07 1996 +0200
+++ b/ObjMem.st	Mon May 20 10:42:20 1996 +0200
@@ -1054,7 +1054,7 @@
         ].
 
         levels add:objects.
-'done with level: ' print. levels size print. ' found ' print. objects size print. ' refs' printNL.
+'done with level: ' print. levels size print. ' found ' print. objects size print. ' refs' printCR.
 
         levels do:[:alreadyFound |
             setOfOwners remove:(alreadyFound instVarNamed:#keyArray) ifAbsent:nil.
@@ -1122,7 +1122,7 @@
       self globalRefChainTo:Transcript topView
      "
 
-    "Modified: 10.4.1996 / 20:15:16 / cg"
+    "Modified: 20.5.1996 / 10:28:58 / cg"
 !
 
 objectAt:anAddress
@@ -3494,6 +3494,6 @@
 !ObjectMemory class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/ObjMem.st,v 1.103 1996-05-18 14:03:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/ObjMem.st,v 1.104 1996-05-20 08:42:20 cg Exp $'
 ! !
 ObjectMemory initialize!