Skip to content

Commit

Permalink
PLT-9055 Added documentation for makeIsDataIndexed where asData w…
Browse files Browse the repository at this point in the history
…as used.

In response to review comment #12 (comment).
  • Loading branch information
bwbush committed Dec 20, 2023
1 parent adfb5ae commit 392246d
Showing 1 changed file with 4 additions and 0 deletions.
4 changes: 4 additions & 0 deletions marlowe-plutus/src/Language/Marlowe/Plutus/Semantics/Types.hs
Expand Up @@ -239,6 +239,8 @@ asData
-- * The contract is notified that a particular observation be made.
-- Typically this would be done by one of the parties,
-- or one of their wallets acting automatically.
--
-- Note that the @asData@ encompases an equivalent @makeIsDataIndexed ''Action [('Deposit, 0), ('Choice, 1), ('Notify, 2)]@.
data Action
= Deposit AccountId Party Token (Value Observation)
| Choice ChoiceId [Bound]
Expand Down Expand Up @@ -283,6 +285,8 @@ asData
-- is a simple contract.
-- At each step of execution, as well as returning a new state and continuation contract,
-- it is possible that effects – payments – and warnings can be generated too.
--
-- Note that the @asData@ encompases an equivalent @makeIsDataIndexed ''Action [('Close, 0), ('Pay, 1), ('If, 2), ('When, 3), ('Let, 4), ('Assert, 5)]@.
data Contract
= Close
| Pay AccountId Payee Token (Value Observation) Contract
Expand Down

0 comments on commit 392246d

Please sign in to comment.