Regression

windows-64 / Tests-windows-64 / Windows64.Compression.Tests.Archives.ZipArchiveTest.testArchiveWithThousandFilesShouldWork (from Compression-Tests)

Failing for the past 1 build (Since #1081 )
Took 12 sec.

Stacktrace

TestTookTooMuchTime
Process>>pvtSignal:list:
BinaryFileStream(AbstractBinaryFileStream)>>position:
ZnBufferedWriteStream>>position:
ZipNewFileMember(ZipArchiveMember)>>writeTo:
[ :member |
		member writeTo: stream.
		member endRead.
	] in ZipArchive>>writeTo:
OrderedCollection>>do:
ZipArchive>>writeTo:
[ :stream | self writeTo: stream ] in ZipArchive(Archive)>>writeToFile:
[ aBlock value: stream ] in FileReference(AbstractFileReference)>>binaryWriteStreamDo:
FullBlockClosure(BlockClosure)>>ensure:
FileReference(AbstractFileReference)>>binaryWriteStreamDo:
ZipArchive(Archive)>>writeToFile:
[
		1 to: 1000 do: [ :i | 
			(dir / ('test-' , i asString))
				writeStreamDo: [ :stream | stream nextPutAll: 'file contents' ];
				yourself ].
		
		theZip := ZipArchive new.
		dir children do: [ :eachFile | theZip addFile: eachFile resolve ].
		theZip writeToFile: FileLocator temp / 'result.zip'.	
		theZip close.
	] in ZipArchiveTest>>testArchiveWithThousandFilesShouldWork
FullBlockClosure(BlockClosure)>>ensure:
ZipArchiveTest>>testArchiveWithThousandFilesShouldWork
ZipArchiveTest(TestCase)>>performTest