adjusted Trace example

This commit is contained in:
Lars Brünjes 2021-07-17 23:43:36 +02:00
parent 316091f960
commit 9132d1b281
No known key found for this signature in database
GPG key ID: B488B9045DC1A087

View file

@ -26,7 +26,7 @@ myTrace = do
callEndpoint @"give" h1 $ GiveParams callEndpoint @"give" h1 $ GiveParams
{ gpBeneficiary = pubKeyHash $ walletPubKey $ Wallet 2 { gpBeneficiary = pubKeyHash $ walletPubKey $ Wallet 2
, gpDeadline = slotToBeginPOSIXTime def 20 , gpDeadline = slotToBeginPOSIXTime def 20
, gpAmount = 1000 , gpAmount = 10000000
} }
void $ waitUntilSlot 20 void $ waitUntilSlot 20
callEndpoint @"grab" h2 () callEndpoint @"grab" h2 ()