Regression

windows-32 / Tests-windows-32 / Windows32.Zinc.Tests.ZnStaticFileServerDelegateTest.testBasicGetWide (from Zinc-Tests)

Failing for the past 1 build (Since #659 )

Error Message

Assertion failed

Stacktrace

TestFailure
Assertion failed
ZnStaticFileServerDelegateTest(TestAsserter)>>assert:description:resumable:
ZnStaticFileServerDelegateTest(TestAsserter)>>assert:description:
ZnStaticFileServerDelegateTest(Object)>>assert:
[ :server | 
			| client |
			(client := ZnClient new)
				beOneShot;
				url: server localUrl;
				addPath: #('local-files' 'wide.html');
				get.
			self assert: client isSuccess.
			self assert: client response contentType equals: ZnMimeType textHtml.
			self assert: client contents equals: self wideHtml.
			self assert: (ZnUtils parseHttpDate: (client response headers at: 'Modification-Date')) equals: (ZnFileSystemUtils modificationTimeFor: 'large.html') asUTC.
			self assert: (ZnUtils parseHttpDate: (client response headers at: 'Expires')) > (DateAndTime now + 10 days).
			self assert: (client response headers at: 'Cache-Control') equals: (server delegate maxAgeFor: ZnMimeType textHtml) ] in ZnStaticFileServerDelegateTest>>testBasicGetWide
FullBlockClosure(BlockClosure)>>cull:
[ 
		(staticFileServerDelegate := ZnStaticFileServerDelegate new)
			prefixFromString: 'local-files'; 
			directory: ZnFileSystemUtils defaultDirectory;
			mimeTypeExpirations: ZnStaticFileServerDelegate defaultMimeTypeExpirations. 
		server delegate: staticFileServerDelegate.
		server start.
		self 
			assert: server isRunning & server isListening
			description: ('Failed to start server on port {1}. Is there one already?' format: { server port }).
		block cull: server
	] in ZnStaticFileServerDelegateTest>>withServerDo:
FullBlockClosure(BlockClosure)>>ensure:
ZnStaticFileServerDelegateTest>>withServerDo:
ZnStaticFileServerDelegateTest>>testBasicGetWide
ZnStaticFileServerDelegateTest(TestCase)>>performTest