Verify asset balances are zero in e2e tests

cardano-foundation · Jan 25, 2021 · af2ce54 · af2ce54
1 parent f110c84
commit af2ce54
Show file tree

Hide file tree

Showing 2 changed files with 17 additions and 6 deletions.
diff --git a/lib/core-integration/src/Test/Integration/Scenario/API/Shelley/Transactions.hs b/lib/core-integration/src/Test/Integration/Scenario/API/Shelley/Transactions.hs
@@ -2772,14 +2772,18 @@ spec = describe "SHELLEY_TRANSACTIONS" $ do
         -> Quantity "lovelace" Natural
         -> m ()
     verifyWalletBalance ctx wallet amt = do
-        eventually "Wallet balance is as expected" $ do
+        eventually "Wallet Ada balance is as expected" $ do
             rGet <- request @ApiWallet ctx
                 (Link.getWallet @'Shelley wallet) Default Empty
             verify rGet
                 [ expectField
                         (#balance . #total) (`shouldBe` amt)
                 , expectField
                         (#balance . #available) (`shouldBe` amt)
+                , expectField
+                        (#assets . #total) (`shouldBe` mempty)
+                , expectField
+                        (#assets . #available) (`shouldBe` mempty)
                 ]
 
     mkTxPayload

diff --git a/lib/core-integration/src/Test/Integration/Scenario/API/Shelley/Wallets.hs b/lib/core-integration/src/Test/Integration/Scenario/API/Shelley/Wallets.hs
@@ -169,7 +169,8 @@ spec = describe "SHELLEY_WALLETS" $ do
             , expectField (#balance . #available) (`shouldBe` Quantity 0)
             , expectField (#balance . #total) (`shouldBe` Quantity 0)
             , expectField (#balance . #reward) (`shouldBe` Quantity 0)
-
+            , expectField (#assets . #total) (`shouldBe` mempty)
+            , expectField (#assets . #available) (`shouldBe` mempty)
             , expectField #delegation (`shouldBe` notDelegating [])
             , expectField #passphrase (`shouldNotBe` Nothing)
             ]
@@ -230,6 +231,8 @@ spec = describe "SHELLEY_WALLETS" $ do
             [ expectResponseCode HTTP.status201
             , expectField (#balance . #available) (`shouldBe` Quantity 0)
             , expectField (#balance . #total) (`shouldBe` Quantity 0)
+            , expectField (#assets . #available) (`shouldBe` mempty)
+            , expectField (#assets . #total) (`shouldBe` mempty)
             ]
 
         --send funds
@@ -254,10 +257,14 @@ spec = describe "SHELLEY_WALLETS" $ do
             rGet <- request @ApiWallet ctx
                 (Link.getWallet @'Shelley wDest) Default Empty
             verify rGet
-                [ expectField
-                        (#balance . #total) (`shouldBe` Quantity minUTxOValue)
-                , expectField
-                        (#balance . #available) (`shouldBe` Quantity minUTxOValue)
+                [ expectField (#balance . #total)
+                    (`shouldBe` Quantity minUTxOValue)
+                , expectField (#balance . #available)
+                    (`shouldBe` Quantity minUTxOValue)
+                , expectField (#assets . #available)
+                    (`shouldBe` mempty)
+                , expectField (#assets . #total)
+                    (`shouldBe` mempty)
                 ]
 
         -- delete wallet