SequenceableCollection.st
branchjv
changeset 23208 3ec0d6cb2a7b
parent 21292 21faad473411
child 23406 cffed6749990
--- a/SequenceableCollection.st	Fri Jul 06 16:09:48 2018 +0100
+++ b/SequenceableCollection.st	Tue May 29 13:29:04 2018 +0200
@@ -3411,16 +3411,20 @@
     "
 !
 
-splitByAnyForWhich:aBlock 
+splitByAnyForWhich:aBlock
     "return a collection containing the subCollection
      (separated by elements for which aBlock evaluates to true) of the receiver.
      This allows breaking up strings using an arbitrary condition."
+    
+    ^ self asCollectionOfSubCollectionsSeparatedByAnyForWhich:aBlock      
 
     "
      'hello:world:isnt:this nice' splitByAnyForWhich:[:ch | ch = $:]
      'h1e2l3l4o' splitByAnyForWhich:[:ch | ch isDigit]
-     #(1 9 2 8 3 7 4 6 5 5) splitByAnyForWhich:[:n | n odd]
-    "
+     #(1 9 2 8 3 7 4 6 5 5 1 2 9) splitByAnyForWhich:[:n | n odd]
+    "
+
+    "Modified (format): / 29-05-2018 / 13:24:06 / svestkap"
 !
 
 splitForSize:pieceSize
@@ -7879,7 +7883,6 @@
     "Created: 14.2.1997 / 16:13:03 / cg"
 ! !
 
-
 !SequenceableCollection methodsFor:'searching'!
 
 detect:aBlock startingAt:startIndex
@@ -10387,6 +10390,11 @@
 
 version_CVS
     ^ '$Header$'
+!
+
+version_HG
+
+    ^ '$Changeset: <not expanded> $'
 ! !