Regression
Darwin-arm64 / Tests-Darwin-arm64-CoInterpreter / MacOSX64.NewTools.DocumentBrowser.GitHubResource.Tests.MicGitHubAPITest.testdefaultBranchProject_Pharo (from NewTools-DocumentBrowser-GitHubResource-Tests)
Failing for the past 1 build
(Since Failed
)
Stacktrace
TestTookTooMuchTime Process>>pvtSignal:list: [self schedule. "It is critical that the following has no suspension point so that the test and the wait primitive are atomic. In addition, if the delay is no longer being waited on while entering the way we know that it is expired because the delay has already fired." beingWaitedOn ifTrue:[delaySemaphore wait] ifFalse:[expired := true]] in DelayWaitTimeout>>wait FullBlockClosure(BlockClosure)>>ensure: DelayWaitTimeout>>wait Semaphore>>waitTimeoutMSecs: Socket>>waitForDataFor:ifClosed:ifTimedOut: Socket>>waitForDataFor: ZdcSecureSocketStream(ZdcAbstractSocketStream)>>socketWaitForData [ self socketWaitForData ] in ZdcSecureSocketStream(ZdcSimpleSocketStream)>>fillReadBuffer FullBlockClosure(BlockClosure)>>on:do: ZdcSecureSocketStream(ZdcSimpleSocketStream)>>fillReadBuffer ZdcSecureSocketStream(ZdcAbstractSocketStream)>>next ZnLineReader>>processNext ZnLineReader>>nextLine ZnStatusLine>>readFrom: ZnStatusLine class>>readFrom: ZnResponse>>readHeaderFrom: ZnResponse(ZnMessage)>>readFrom: ZnResponse class(ZnMessage class)>>readFrom: [ :stream | ZnResponse readFrom: stream ] in [ [ :stream | ZnResponse readFrom: stream ] ] in ZnClient>>reader [ response := (#(HEAD CONNECT) includes: request method) ifTrue: [ ZnResponse readHeaderFrom: connection ] ifFalse: [ self streaming ifTrue: [ ZnResponse readStreamingFrom: connection ] ifFalse: [ self reader value: connection ] ] ] in [ self withDefaultCharacterEncoderDo: [ response := (#(HEAD CONNECT) includes: request method) ifTrue: [ ZnResponse readHeaderFrom: connection ] ifFalse: [ self streaming ifTrue: [ ZnResponse readStreamingFrom: connection ] ifFalse: [ self reader value: connection ] ] ] ] in ZnClient>>readResponse True>>ifTrue:ifFalse: ZnClient>>withDefaultCharacterEncoderDo: [ self withDefaultCharacterEncoderDo: [ response := (#(HEAD CONNECT) includes: request method) ifTrue: [ ZnResponse readHeaderFrom: connection ] ifFalse: [ self streaming ifTrue: [ ZnResponse readStreamingFrom: connection ] ifFalse: [ self reader value: connection ] ] ] ] in ZnClient>>readResponse True>>ifTrue:ifFalse: ZnClient>>withMaximumNumberOfDictionaryEntriesDo: ZnClient>>readResponse ZnClient>>executeRequestResponse [ self executeRequestResponse ] in ZnClient>>getConnectionAndExecute FullBlockClosure(BlockClosure)>>ensure: ZnClient>>getConnectionAndExecute ZnClient>>executeWithRedirectsRemaining: [ self executeWithRedirectsRemaining: self maxNumberOfRedirects ] in ZnClient>>executeWithRetriesRemaining: FullBlockClosure(BlockClosure)>>on:do: ZnClient>>executeWithRetriesRemaining: [ self executeWithRetriesRemaining: self numberOfRetries ] in [ [ self executeWithRetriesRemaining: self numberOfRetries ] on: Error do: self ifFailBlock ] in ZnClient>>executeWithTimeout FullBlockClosure(BlockClosure)>>on:do: [ [ self executeWithRetriesRemaining: self numberOfRetries ] on: Error do: self ifFailBlock ] in ZnClient>>executeWithTimeout [ ^ block value ] in ZnClient>>withTimeoutDo: [ activeProcess psValueAt: index put: anObject. aBlock value ] in ZnConnectionTimeout(DynamicVariable)>>value:during: FullBlockClosure(BlockClosure)>>ensure: ZnConnectionTimeout(DynamicVariable)>>value:during: ZnConnectionTimeout class(DynamicVariable class)>>value:during: ZnClient>>withTimeoutDo: ZnClient>>executeWithTimeout [ | result | self prepareRequest. result := self executeWithTimeout. self prepareNextRequest. result ] in ZnClient>>execute [ activeProcess psValueAt: index put: anObject. aBlock value ] in ZnCurrentOptions(DynamicVariable)>>value:during: FullBlockClosure(BlockClosure)>>ensure: ZnCurrentOptions(DynamicVariable)>>value:during: ZnCurrentOptions class(DynamicVariable class)>>value:during: [ ZnCurrentOptions value: self during: block ] in ZnOptions>>conditionallyDuring: UndefinedObject>>ifNil:ifNotNil: ZnOptions>>conditionallyDuring: ZnClient>>withDynamicVariablesDo: ZnClient>>execute ZnClient>>get [ (self newRequestTo: aString) get; response ] in MicGitHubAPI(IceGitHubAPI)>>get: MicGitHubAPI(IceGitHubAPI)>>responseWithValidationDo: MicGitHubAPI(IceGitHubAPI)>>contentsWithValidationDo: MicGitHubAPI(IceGitHubAPI)>>jsonContentsWithValidationDo: MicGitHubAPI(IceGitHubAPI)>>get: [ super get: apiCallString] in MicGitHubAPI>>get: FullBlockClosure(BlockClosure)>>cull: [ | value | value := block cull: key. "Sadly we have to check the presence of key again in case of the block execution already added the entry" keyIndex associationAt: key ifAbsent: [ association := self newAssociationKey: key value: value. ^ self handleMiss: association ] ] in [ | association | association := keyIndex associationAt: key ifAbsent: [ | value | value := block cull: key. "Sadly we have to check the presence of key again in case of the block execution already added the entry" keyIndex associationAt: key ifAbsent: [ association := self newAssociationKey: key value: value. ^ self handleMiss: association ] ]. ^ self handleHit: association ] in LRUCache>>at:ifAbsentPut: Dictionary>>associationAt:ifAbsent: [ | association | association := keyIndex associationAt: key ifAbsent: [ | value | value := block cull: key. "Sadly we have to check the presence of key again in case of the block execution already added the entry" keyIndex associationAt: key ifAbsent: [ association := self newAssociationKey: key value: value. ^ self handleMiss: association ] ]. ^ self handleHit: association ] in LRUCache>>at:ifAbsentPut: LRUCache(AbstractCache)>>critical: LRUCache>>at:ifAbsentPut: MicGitHubAPI>>get: [response := self get: ('repos/{1}/{2}' format: {user. project}). ^ response at: 'default_branch' ifAbsent: [ 'main' ]] in MicGitHubAPI>>defaultBranch:project: FullBlockClosure(BlockClosure)>>on:do: MicGitHubAPI>>defaultBranch:project: [ api defaultBranch: 'pillar-markup' project: 'Microdown' ] in MicGitHubAPITest>>setUp FullBlockClosure(BlockClosure)>>on:do: MicGitHubAPITest>>setUp