#BUGFIX by cg
authorClaus Gittinger <cg@exept.de>
Tue, 06 Mar 2018 19:41:39 +0100
changeset 22582 d31fd43ab874
parent 22581 c912f81c6c5e
child 22583 879bd9713cb9
#BUGFIX by cg class: Collection changed: #do:displayingProgress:
Collection.st
--- a/Collection.st	Tue Mar 06 19:01:28 2018 +0100
+++ b/Collection.st	Tue Mar 06 19:41:39 2018 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
               All Rights Reserved
@@ -297,6 +295,8 @@
     ^ self newWithSize:n
 ! !
 
+
+
 !Collection class methodsFor:'Signal constants'!
 
 emptyCollectionSignal
@@ -366,6 +366,8 @@
     ^ self
 ! !
 
+
+
 !Collection methodsFor:'Compatibility-ANSI'!
 
 identityIncludes:anObject
@@ -375,6 +377,7 @@
     ^ self includesIdentical:anObject.
 ! !
 
+
 !Collection methodsFor:'Compatibility-Squeak'!
 
 , aCollection
@@ -536,12 +539,9 @@
     "return ifNotEmptyValue if not empty, ifEmptyValue otherwise"
 
     ^ self ifEmpty:ifEmptyValue ifNotEmpty:ifNotEmptyValue
-!
-
-includesAnyOf:anotherCollection
-    ^ self includesAny:anotherCollection
 ! !
 
+
 !Collection methodsFor:'accessing'!
 
 anElement
@@ -4523,7 +4523,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
@@ -5882,7 +5882,7 @@
 includesAll:aCollection
     "return true if the receiver includes all elements of
      the argument, aCollection; false if any is missing.
-     Notice: this method has O² runtime behavior and may be
+     Notice: this method has O² runtime behavior and may be
              slow for big receivers/args.
              Think about using a Set, or Dictionary."
 
@@ -5902,7 +5902,7 @@
      Return false if it includes none.
      Uses #= (value compare)
      Notice:
-        this method has O² runtime behavior for some subclasses and may be slow for big receivers/args.
+        this method has 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
         probable elements towards the beginning of aCollection, to avoid useless searches.
@@ -5979,7 +5979,7 @@
      Return false if it includes none.
      Use identity compare for comparing.
      Notice:
-        this method has O² runtime behavior for some subclasses and may be slow for big receivers/args.
+        this method has 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
         probable elements towards the beginning of aCollection, to avoid useless searches."
@@ -6195,6 +6195,7 @@
     ^ aVisitor visitCollection:self with:aParameter
 ! !
 
+
 !Collection class methodsFor:'documentation'!
 
 version