From e2aa9b89b6fb2a8d60af0dad9be125e2cb3eaf43 Mon Sep 17 00:00:00 2001 From: Erik de Castro Lopo Date: Wed, 5 Sep 2018 10:09:38 +1000 Subject: [PATCH] Disable the 'runActionCheck' wallet integration test This test was highly un-reliable, failing in CI for no good reason about 50% of the time. This test will be replaced. --- wallet-new/integration/Main.hs | 16 +++++++++------- 1 file changed, 9 insertions(+), 7 deletions(-) diff --git a/wallet-new/integration/Main.hs b/wallet-new/integration/Main.hs index 8fcfcfb428a..0270b31942d 100644 --- a/wallet-new/integration/Main.hs +++ b/wallet-new/integration/Main.hs @@ -63,15 +63,17 @@ main = do printT "Starting deterministic tests." hspec $ deterministicTests wRef walletClient manager - walletState <- initialWalletState walletClient + printT $ "The 'runActionCheck' tests were disabled because they were highly un-reliable." + when False $ do + walletState <- initialWalletState walletClient - printT $ "Initial wallet state: " <> show walletState + printT $ "Initial wallet state: " <> show walletState - -- some monadic fold or smth similar - void $ runActionCheck - walletClient - walletState - actionDistribution + -- some monadic fold or smth similar + void $ runActionCheck + walletClient + walletState + actionDistribution where orFail :: MonadFail m => Either String a -> m a orFail =