170: Rewrite testFailedAcceptOnAlternateLocalhost as testFailedConnect. Testing a failed connect is really the intention of the test.

testFailedAcceptOnAlternateLocalhost failed on macOS since it could not bind to the alternate localhost address.

Author: kurtkilpela

src/RemoteServiceReplication-Test/RsrConnectionSpecificationTestCase.class.st

@@ -260,24 +260,15 @@ RsrConnectionSpecificationTestCase >> testEstablishConnection [
 ]
 
 { #category : 'running' }
-RsrConnectionSpecificationTestCase >> testFailedAcceptOnAlternativeLocalhost [
+RsrConnectionSpecificationTestCase >> testFailedConnect [
 
-	| acceptor initiator semaphore |
-	acceptor := RsrAcceptConnection
-		host: self alternativeLocalhost
-		port: self port.
+	| initiator |
 	initiator := RsrInitiateConnection
 		host: self localhost
 		port: self port.
-	semaphore := Semaphore new.
-	RsrProcessModel
-		fork: [[semaphore signal. acceptor waitForConnection] on: RsrWaitForConnectionCancelled do: [:ex | ex return]]
-		named: 'Pending WaitForConnectionCancelled'.
-	[semaphore wait.
 	self
 		should: [initiator connect]
-		raise: RsrSocketError]
-			ensure: [acceptor cancelWaitForConnection]
+		raise: RsrSocketError
 ]
 
 { #category : 'running' }