tests for delegate voting

2022-07-25 22:18:54 +08:00 · 2022-07-25 22:18:54 +08:00 · 791b1fe291
commit 791b1fe291
parent 11757be255
3 changed files with 34 additions and 7 deletions
--- a/agora-specs/Spec/Proposal.hs
+++ b/agora-specs/Spec/Proposal.hs
@ -130,8 +130,12 @@ specs =
             in [legalGroup, illegalGroup]
      , group
          "voting"
-          [ Vote.mkTestTree "legal" Vote.validVoteParameters True
-          -- TODO: add negative test cases
+          [ group
+              "legal"
+              [ Vote.mkTestTree "ordinary" Vote.validVoteParameters True
+              , Vote.mkTestTree "delegate" Vote.validVoteAsDelegateParameters True
+              ]
+              -- TODO: add negative test cases
          ]
      , group
          "advancing"