--- a/Visitor.st	Thu Nov 09 10:41:59 2017 +0100
+++ b/Visitor.st	Thu Nov 09 11:00:28 2017 +0100
@@ -92,9 +92,9 @@
 
 visitChildrenOf:anObject
     "recursively enumerate anObjects refs, visiting each of the child objects.
-     nil childs are not visited"
+     nil children are not visited"
 
-    |instVarNames theClass 
+    |instVarNames theClass
      sz "{ Class: SmallInteger }"|
 
     theClass := anObject class.
@@ -114,11 +114,13 @@
         sz := anObject basicSize.
         sz ~~ 0 ifTrue:[
             1 to:sz do:[:i |
-                (anObject basicAt:i) acceptVisitor:self with:i.   
+                (anObject basicAt:i) acceptVisitor:self with:i.
                 self nextObject.
             ]
         ].
     ].
+
+    "Modified (comment): / 09-11-2017 / 10:46:55 / mawalch"
 ! !
 
 !Visitor methodsFor:'subclass responsibility'!