Apply governor mutation based on existing datum

2023-03-29 21:33:09 +01:00 · 2023-03-29 21:33:09 +01:00 · ad80e9f685
commit ad80e9f685
parent 9e18c294f8
3 changed files with 71 additions and 21 deletions
--- a/agora-specs/Spec/Effect/GovernorMutation.hs
+++ b/agora-specs/Spec/Effect/GovernorMutation.hs
@ -47,7 +47,16 @@ specs =
          , effectSucceedsWith
              "effect validator should pass"
              effectValidator
-              (mkEffectDatum validNewGovernorDatum)
+              ( mkEffectDatum
+                  ( GovernorDatum
+                      def
+                      (ProposalId 0)
+                      def
+                      def
+                      3
+                  )
+                  validNewGovernorDatum
+              )
              (ScriptContext (mkEffectTxInfo validNewGovernorDatum) (Spending effectRef))
          ]
      , group
@ -70,7 +79,16 @@ specs =
          , effectFailsWith
              "effect validator should fail"
              effectValidator
-              (mkEffectDatum validNewGovernorDatum)
+              ( mkEffectDatum
+                  ( GovernorDatum
+                      def
+                      (ProposalId 0)
+                      def
+                      def
+                      3
+                  )
+                  validNewGovernorDatum
+              )
              (ScriptContext (mkEffectTxInfo invalidNewGovernorDatum) (Spending effectRef))
          ]
      ]