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

fix broken test cases

Browse source
This commit is contained in:
Hongrui Fang 2022-06-28 17:58:18 +08:00
parent 89e9196983
commit 5ce76885fc
3 changed files with 42 additions and 28 deletions
Download patch file Download diff file Expand all files Collapse all files

4
agora-specs/Spec/Proposal.hs
View file

@ -181,7 +181,7 @@ specs =
( ResultTag 0
, case initialState of
Draft -> 0
_ -> untag (def :: ProposalThresholds).vote + 1
_ -> untag (def :: ProposalThresholds).execute + 1
)
, (ResultTag 1, 0)
]
@ -268,7 +268,7 @@ specs =
, votes =
ProposalVotes
( AssocMap.fromList
[ (ResultTag 0, 0)
[ (ResultTag 0, 1)
, (ResultTag 1, 0)
]
)