Merge pull request #3537 from input-output-hk/erikd/wallet-integration

Disable the 'runActionCheck' wallet integration test
input-output-hk · Sep 5, 2018 · ac4f3ac · ac4f3ac
2 parents 9c71e1e + e2aa9b8
commit ac4f3ac
Showing 1 changed file with 9 additions and 7 deletions.
diff --git 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 =