update restore bench for quantity -> coin

cardano-foundation · Jan 22, 2021 · f219cf1 · f219cf1
1 parent ef0d3f7
commit f219cf1
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/lib/shelley/bench/Restore.hs b/lib/shelley/bench/Restore.hs
@@ -445,7 +445,7 @@ benchmarksRnd _ w wid wname benchname restoreTime = do
     (_, estimateFeesTime) <- bench "estimate tx fee" $ do
         let out = TxOut (dummyAddress @n) (TokenBundle.fromCoin $ Coin 1)
         runExceptT $ withExceptT show $ W.estimateFeeForPayment @_ @s @k
-            w wid (out :| []) (Quantity 0) Nothing
+            w wid (out :| []) (Coin 0) Nothing
 
     oneAddress <- genAddresses 1 cp
     (_, importOneAddressTime) <- bench "import one addresses" $ do
@@ -532,7 +532,7 @@ benchmarksSeq _ w wid _wname benchname restoreTime = do
     (_, estimateFeesTime) <- bench "estimate tx fee" $ do
         let out = TxOut (dummyAddress @n) (TokenBundle.fromCoin $ Coin 1)
         runExceptT $ withExceptT show $ W.estimateFeeForPayment @_ @s @k
-            w wid (out :| []) (Quantity 0) Nothing
+            w wid (out :| []) (Coin 0) Nothing
 
     let walletOverview = WalletOverview{utxo,addresses,transactions}