store timing config in the proposal datum

.... and mock the value upon creation for now
This commit is contained in:
fanghr 2022-05-18 20:34:56 +08:00
parent 7da72e9398
commit d44fe083da
8 changed files with 68 additions and 2 deletions

View file

@ -151,6 +151,7 @@ proposalValidator proposal =
, "cosigners"
, "thresholds"
, "votes"
, "timingConfig"
]
proposalDatum
@ -253,6 +254,7 @@ proposalValidator proposal =
.& #cosigners .= proposalF.cosigners
.& #thresholds .= proposalF.thresholds
.& #votes .= pdata expectedNewVotes
.& #timingConfig .= proposalF.timingConfig
)
tcassert "Invalid output proposal" $ proposalOut #== expectedProposalOut
@ -342,6 +344,7 @@ proposalValidator proposal =
.& #cosigners .= pdata updatedSigs
.& #thresholds .= proposalF.thresholds
.& #votes .= proposalF.votes
.& #timingConfig .= proposalF.timingConfig
)
)
in foldr1