WIP Conway PPatrams

IntersectMBO · Apr 25, 2024 · 1023959 · 1023959
1 parent d9b5b60
commit 1023959
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 1 deletion.
diff --git a/eras/conway/impl/src/Cardano/Ledger/Conway/Governance.hs b/eras/conway/impl/src/Cardano/Ledger/Conway/Governance.hs
@@ -231,6 +231,10 @@ data ConwayGovState era = ConwayGovState
   , cgsConstitution :: !(Constitution era)
   , cgsCurPParams :: !(PParams era)
   , cgsPrevPParams :: !(PParams era)
+  , cgsFuturePParams :: Maybe (PParams era)
+  -- ^ Prediction of any parameter changes that might happen on the epoch boundary. The
+  -- field is lazy on purpose, since we need to compute this field only towards the
+  -- end of the epoch.
   , cgsDRepPulsingState :: !(DRepPulsingState era)
   -- ^ The 'cgsDRepPulsingState' field is a pulser that incrementally computes the stake
   -- distribution of the DReps over the Epoch following the close of voting at end of

diff --git a/eras/shelley/impl/src/Cardano/Ledger/Shelley/Governance.hs b/eras/shelley/impl/src/Cardano/Ledger/Shelley/Governance.hs
@@ -114,7 +114,7 @@ data ShelleyGovState era = ShelleyGovState
   , sgsPrevPParams :: !(PParams era)
   , sgsFuturePParams :: Maybe (PParams era)
   -- ^ Prediction of any parameter changes that might happen on the epoch boundary. The
-  -- field is lazy on purpose, since we only need to compute this field only towards the
+  -- field is lazy on purpose, since we need to compute this field only towards the
   -- end of the epoch.
   }
   deriving (Generic)