--- a/SequenceableCollection.st	Wed Jul 07 01:29:25 1999 +0200
+++ b/SequenceableCollection.st	Wed Jul 07 01:54:54 1999 +0200
@@ -3037,6 +3037,35 @@
     "
 !
 
+indexOfAnyOf:aCollection
+    "squeak compatibility: same as #indexOfAny:"
+
+    ^ self indexOfAny:aCollection
+
+    "
+     #(10 20 30 40 50 60 70) indexOfAnyOf:#(40 30 50)
+     #(10 20 30 40 50 60 70) indexOfAnyOf:#(40.0 30.0 50)
+    "
+!
+
+indexOfAnyOf:aCollection startingAt:start 
+    "squeak compatibility: same as #indexOfAny:startingAt:"
+
+    ^ self indexOfAny:aCollection startingAt:start
+
+    "
+     #(10 20 30 40 50 60 70) indexOfAnyOf:#(40 30 50)     startingAt:2
+     #(10 20 30 40 50 60 70) indexOfAnyOf:#(40.0 30.0 50) startingAt:2
+    "
+!
+
+indexOfAnyOf:aCollection startingAt:start ifAbsent:exceptionBlock
+    "squeak compatibility: same as #indexOfAny:startingAt:ifAbsent:"
+
+    ^ self indexOfAny:aCollection startingAt:start ifAbsent:exceptionBlock
+
+!
+
 indexOfSubCollection:aCollection
     "find a subcollection. 
      If found, return the index; if not found, return 0."
@@ -4229,6 +4258,6 @@
 !SequenceableCollection class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/SequenceableCollection.st,v 1.105 1999-06-23 11:57:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/SequenceableCollection.st,v 1.106 1999-07-06 23:54:54 cg Exp $'
 ! !
 SequenceableCollection initialize!