remove infinities in ProposalTime, fix test build

2022-04-28 17:00:19 +02:00 · 2022-04-28 17:00:19 +02:00 · cf14d9edd8
commit cf14d9edd8
parent c8f5c6af8f
5 changed files with 30 additions and 27 deletions
--- a/agora-test/Spec/Proposal.hs
+++ b/agora-test/Spec/Proposal.hs
@ -16,10 +16,10 @@ import Agora.Proposal (
  ProposalId (ProposalId),
  ProposalRedeemer (Cosign),
  ProposalStatus (Draft),
-  ProposalVotes (ProposalVotes),
  ResultTag (ResultTag),
  cosigners,
  effects,
+  emptyVotesFor,
  proposalId,
  status,
  thresholds,
@ -70,7 +70,12 @@ tests =
                  , status = Draft
                  , cosigners = [signer]
                  , thresholds = Shared.defaultProposalThresholds
-                  , votes = ProposalVotes AssocMap.empty
+                  , votes =
+                      emptyVotesFor $
+                        AssocMap.fromList
+                          [ (ResultTag 0, [])
+                          , (ResultTag 1, [])
+                          ]
                  }
              )
              (Cosign [signer2])
--- a/agora-test/Spec/Sample/Proposal.hs
+++ b/agora-test/Spec/Sample/Proposal.hs
@ -43,7 +43,6 @@ import Agora.Proposal (
  ProposalDatum (..),
  ProposalId (..),
  ProposalStatus (..),
-  ProposalVotes (..),
  ResultTag (..),
  emptyVotesFor,
 )
--- a/agora-test/Spec/Sample/Shared.hs
+++ b/agora-test/Spec/Sample/Shared.hs
@ -129,5 +129,5 @@ defaultProposalThresholds =
  ProposalThresholds
    { countVoting = Tagged 1000
    , create = Tagged 1
-    , vote = Tagged 10
+    , startVoting = Tagged 10
    }