Relax test condition in testSpawnReconnect
commit076ab9ea09920422dc2caf3a2cbdfd654504518f
authorEdsko de Vries <edsko@well-typed.com>
dateWed 5 Sep 2012, 12:16 (14 years ago)
parent36ba75d
distributed-process/tests/TestClosure.hs+1−1
@@ -418,7 +418,7 @@ testSpawnReconnect transport rtable transportInternals = do
418418 liftIO $ threadDelay 100000
419419
420420 count <- liftIO $ takeMVar iv
421− True <- return $ count == 3
421+ True <- return $ count == 2 || count == 3 -- It depends on which message we get first in 'spawn'
422422
423423 liftIO $ putMVar done ()
424424