updated 'Free'

This commit is contained in:
Lars Brünjes 2021-05-04 00:12:20 +02:00
parent 63476046a2
commit 34f21a1a47
No known key found for this signature in database
GPG key ID: B488B9045DC1A087

View file

@ -51,7 +51,7 @@ type FreeSchema =
BlockchainActions BlockchainActions
.\/ Endpoint "mint" MintParams .\/ Endpoint "mint" MintParams
mint :: (HasBlockchainActions s, AsContractError e) => MintParams -> Contract w s e () mint :: MintParams -> Contract w FreeSchema Text ()
mint mp = do mint mp = do
let val = Value.singleton curSymbol (mpTokenName mp) (mpAmount mp) let val = Value.singleton curSymbol (mpTokenName mp) (mpAmount mp)
lookups = Constraints.monetaryPolicy policy lookups = Constraints.monetaryPolicy policy