add temporary log trace for debugging STAKE_POOLS_LIST_01

cardano-foundation · Jul 3, 2020 · 07efd81 · 07efd81
1 parent fae4919
commit 07efd81
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/lib/core-integration/src/Test/Integration/Scenario/API/Shelley/StakePools.hs b/lib/core-integration/src/Test/Integration/Scenario/API/Shelley/StakePools.hs
@@ -548,6 +548,7 @@ spec = do
         it "contains and is sorted by non-myopic-rewards" $ \ctx -> do
             eventually "eventually shows non-zero rewards" $ do
                 Right pools@[pool1,_pool2,pool3] <- snd <$> listPools ctx
+                print pools -- FIXME Temporary for debugging CI.
                 let rewards = view (#metrics . #nonMyopicMemberRewards)
                 (rewards <$> pools) `shouldBe`
                     (rewards <$> sortOn (Down . rewards) pools)