Sulkta-OSS/agora
3
0
Fork 0
Code Issues 1 Pull requests Projects Releases Packages Wiki Activity Actions

add new tests for creating proposals

Browse source
This commit is contained in:
Hongrui Fang 2022-07-09 03:39:54 +08:00
parent 5eee3127b2
commit 79eb0772c3
11 changed files with 593 additions and 173 deletions
Download patch file Download diff file Expand all files Collapse all files

5
agora-specs/Sample/Proposal/Vote.hs
View file

@ -47,7 +47,7 @@ import PlutusLedgerApi.V1 (
)
import PlutusLedgerApi.V1.Value qualified as Value
import PlutusTx.AssocMap qualified as AssocMap
import Sample.Proposal.Shared (proposalTxRef, stakeTxRef, testFunc)
import Sample.Proposal.Shared (proposalTxRef, stakeTxRef)
import Sample.Shared (
minAda,
proposalPolicySymbol,
@ -61,6 +61,7 @@ import Sample.Shared qualified as Shared
import Test.Specification (
SpecificationTree,
group,
testValidator,
validatorSucceedsWith,
)
import Test.Util (closedBoundedInterval, sortValue, updateMap)
@ -243,7 +244,7 @@ mkTestTree name ps isValid = group name [proposal, stake]
txInfo = vote ps
proposal =
testFunc
testValidator
isValid
"propsoal"
(proposalValidator Shared.proposal)