--- a/Object.st	Wed Jul 09 18:21:09 2014 +0200
+++ b/Object.st	Wed Jul 09 18:21:17 2014 +0200
@@ -492,7 +492,6 @@
     InfoPrinting := aBoolean
 ! !
 
-
 !Object class methodsFor:'queries'!
 
 isAbstract
@@ -515,8 +514,6 @@
 ! !
 
 
-
-
 !Object methodsFor:'Compatibility-Dolphin'!
 
 stbFixup: anSTBInFiler at: newObjectIndex
@@ -678,7 +675,6 @@
     "
 ! !
 
-
 !Object methodsFor:'accessing'!
 
 _at:index
@@ -2011,7 +2007,6 @@
     ^ aBlock ensure:[ self addDependent:someone ]
 ! !
 
-
 !Object methodsFor:'comparing'!
 
 = anObject
@@ -7844,7 +7839,6 @@
     ^ self
 ! !
 
-
 !Object methodsFor:'secure message sending'!
 
 ?: selector
@@ -8451,7 +8445,6 @@
     "
 ! !
 
-
 !Object methodsFor:'synchronized evaluation'!
 
 freeSynchronizationSemaphore
@@ -10133,21 +10126,20 @@
 !
 
 acceptVisitor:aVisitor with:aParameter
-    "double-dispatch onto a Visitor.
-     Subclasses redefine this"
+    "double-dispatch via visitObject:with: into a Visitor.
+     Subclasses redefine this to pass their type in the message name (i.e. visitXXX:)"
 
     ^ aVisitor visitObject:self with:aParameter
 ! !
 
-
 !Object class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Object.st,v 1.775 2014-06-17 20:47:48 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Object.st,v 1.776 2014-07-09 16:21:17 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Object.st,v 1.775 2014-06-17 20:47:48 vrany Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Object.st,v 1.776 2014-07-09 16:21:17 cg Exp $'
 !
 
 version_SVN