--- a/Collection.st	Sat Aug 24 20:17:20 2019 +0200
+++ b/Collection.st	Sun Aug 25 12:09:09 2019 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
               All Rights Reserved
@@ -3134,7 +3132,10 @@
 !
 
 do:aBlock
-    "evaluate the argument, aBlock for each element"
+    "evaluate the argument, aBlock for each element.
+     Return the receiver 
+     (subclasses should care to also return the receiver, 
+      in case do: is used in a chain of messages.)"
 
     ^ self subclassResponsibility
 !
@@ -4975,7 +4976,7 @@
     aStream nextPut:$)
 
     "
-     #(1 2 3 'hello' $a $ü) printOn:Transcript
+     #(1 2 3 'hello' $a $ü) printOn:Transcript
      (Array new:100000) printOn:Transcript
      (Array new:100000) printOn:Stdout
      (Array new:100000) printString size
@@ -5154,7 +5155,7 @@
     "return true if the receiver includes all elements of
      the argument, aCollection; false if any is missing.
      Notice: depending on the concrete collection,
-             this method may have O² runtime behavior,
+             this method may have O² runtime behavior,
              and may be slow for big receivers/args.
              Think about using a Set, or Dictionary."
 
@@ -5191,7 +5192,7 @@
      Uses #= (value compare)
      Notice: 
         depending on the concrete collection,
-        this method may have O² runtime behavior,
+        this method may have O² runtime behavior,
         and may be slow for big receivers/args.
         Think about using a Set, or Dictionary.
 
@@ -5273,7 +5274,7 @@
      Use identity compare for comparing.
      Notice:
         depending on the concrete collection,
-        this method may have O² runtime behavior for some subclasses
+        this method may have O² runtime behavior for some subclasses
         and may be slow for big receivers/args.
         Think about using a Set or Dictionary.
         Some speedup is also possible, by arranging highly