regression tests for down voting with fake stakes

2022-11-01 00:25:46 +08:00 · 2022-11-01 00:25:46 +08:00 · e9e1502138
commit e9e1502138
parent a200f4ee20
2 changed files with 30 additions and 2 deletions
--- a/agora-specs/Spec/Proposal.hs
+++ b/agora-specs/Spec/Proposal.hs
@ -402,6 +402,10 @@ specs =
                      "change output stake value"
                      (Unlock.mkChangeOutputStakeValue nStakes)
                      (Unlock.Validity True False)
+                  , Unlock.mkTestTree
+                      "use fake stake"
+                      (Unlock.mkUseFakeStakes nStakes)
+                      (Unlock.Validity False False)
                  ]

              legalGroup = group "legal" $ map mkLegalGroup stakeCountCases