diff -r 46dd1237b20a -r 3b81c9e53352 compiler/tests/extras/PPCResources.st --- a/compiler/tests/extras/PPCResources.st Fri Jul 31 14:07:31 2015 +0100 +++ b/compiler/tests/extras/PPCResources.st Mon Aug 17 12:56:02 2015 +0100 @@ -125,6 +125,18 @@ ] ! ! +!PPCResources methodsFor:'others'! + +idsOfSize: size + | stream | + stream := WriteStream on: (String new: size). + + [stream size < size] whileTrue: [ + stream nextPutAll: 'Lorem ipsum dolor sit amet consectetur adipiscing elit sed do eiusmod tempor incididunt ut labore et dolore magna aliqua Ut enim ad minim veniam quis nostrud exercitation ullamco'. + ]. + ^ stream contents +! ! + !PPCResources methodsFor:'private utilities'! files: files withExtension: extension @@ -177,6 +189,10 @@ ^ self smalltalkInDirectory: '../smalltalk-src/' ! +smalltalkSourcesMedium + ^ (self smalltalkInDirectory: '../smalltalk-src/') copyFrom: 1 to: 10*1000. +! + smalltalkSourcesSmall ^ (self smalltalkInDirectory: '../smalltalk-src/') copyFrom: 1 to: 1000. ! !