'From Pharo7.0.2 of 15 March 2019 [Build information: Pharo-7.0.2+build.154.sha.9f17218676db0c1a0dd5d1b03226e660dbd674b6 (32 Bit)] on 28 December 2019 at 11:33:01.066244 am'!

!Set methodsFor: 'splitting' stamp: 'RichardOKeefe 12/28/2019 11:29'!
split: aSequenceableCollection indicesDo: aBlock
	"Perform an action specified as aBlock (with a start and end argument) to each of the indices of aSequenceableCollection that have been identified by taking the receiver as a splitter." 
	| position |
	
	position := 1.
	aSequenceableCollection withIndexDo: [:element :idx |
		(self includes: element) 
			ifTrue: [
				aBlock value: position value: idx - 1.
				position := idx + 1 ]].
		
	aBlock value: position value: aSequenceableCollection size! !


!Set reorganize!
(#'*OpalCompiler-Core' parseOptions:)
(#'*Monticello-Storing' comeFullyUpOnReload:)
(#copying postCopy)
(#adding add:)
(#accessing like:ifAbsent: like:)
(#converting asSet)
(#private rehash fixCollisionsFrom: noCheckAdd: scanFor: grow withArray: noCheckNoGrowFillFrom:)
(#'*Random-Core' atRandom:)
(#enumerating difference: collect: intersection: do:)
(#'*Reflectivity' metaLinkOptions)
(#'*ston-core' stonPostReferenceResolution)
(#comparing =)
(#testing isHealthy occurrencesOf: includes:)
(#removing remove:ifAbsent: copyWithout:)
(#'*GT-InspectorExtensions-Core' gtInspectorItemsIn:)
(#splitting split:indicesDo:)
(#'*Fuel-Core' fuelAfterMaterialization fuelAccept: addIfNotPresent:ifPresentDo:)
!