Op 3-12-2018 om 16:08 schreef Benoit St-Jean via Pharo-users:
yep I did change it by the argument partTwo: aFileName | total numbers index frequencies duplicate file | duplicate := false. frequencies := Set new: 150000. frequencies add: 0. numbers := OrderedCollection new: 1000. total := 0. file := self changesFrom: aFileName. index := 0. [duplicate] whileFalse: [index := index \\ (numbers size) + 1. total := total + numbers at: index. (frequencies includes: total) ifTrue: [duplicate := true] ifFalse: [frequencies add: total]]. ^total and changesFrom looks like this : changesFrom: aFileName ^Array streamContents: [:changes | aFileName asFileReference readStreamDo: [:in | [in atEnd] whileFalse: [changes nextPut: in nextLine asInteger]]]
