Skip to content

Commit bf60069

Browse files
committed
Add Conway governance constraints to experimental constraints
1 parent b545f50 commit bf60069

2 files changed

Lines changed: 11 additions & 1 deletion

File tree

Lines changed: 6 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,6 @@
1+
project: cardano-api
2+
pr: 1189
3+
kind:
4+
- compatible
5+
description: |
6+
Add ConwayEraGov, ConwayEraCertState, and GovState ~ ConwayGovState type equality to EraCommonConstraints. Both Conway and Dijkstra satisfy these constraints, so obtainCommonConstraints now provides governance-related constraints without needing conwayEraOnwardsConstraints.

cardano-api/src/Cardano/Api/Experimental/Era.hs

Lines changed: 5 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -53,9 +53,10 @@ import Cardano.Ledger.Alonzo.Plutus.Context qualified as L
5353
import Cardano.Ledger.Api qualified as L
5454
import Cardano.Ledger.BaseTypes (Inject (..))
5555
import Cardano.Ledger.Conway qualified as Ledger
56+
import Cardano.Ledger.Conway.Governance qualified as L
57+
import Cardano.Ledger.Conway.State qualified as L
5658
import Cardano.Ledger.Core qualified as Ledger
5759
import Cardano.Ledger.Hashes qualified as L
58-
import Cardano.Ledger.State qualified as L
5960

6061
import Control.Monad.Error.Class
6162
import Data.Aeson (FromJSON (..), ToJSON, withText)
@@ -303,6 +304,8 @@ type EraCommonConstraints era =
303304
, L.AlonzoEraTx (LedgerEra era)
304305
, L.BabbageEraPParams (LedgerEra era)
305306
, L.BabbageEraTxBody (LedgerEra era)
307+
, L.ConwayEraCertState (LedgerEra era)
308+
, L.ConwayEraGov (LedgerEra era)
306309
, L.ConwayEraTxBody (LedgerEra era)
307310
, L.ConwayEraTxCert (LedgerEra era)
308311
, L.Era (LedgerEra era)
@@ -314,6 +317,7 @@ type EraCommonConstraints era =
314317
, L.EraUTxO (LedgerEra era)
315318
, HasTypeProxy era
316319
, Ord (L.PlutusPurpose L.AsIx (LedgerEra era))
320+
, L.GovState (LedgerEra era) ~ L.ConwayGovState (LedgerEra era)
317321
, L.ScriptsNeeded (LedgerEra era) ~ L.AlonzoScriptsNeeded (LedgerEra era)
318322
, L.Val (L.Value (LedgerEra era))
319323
, L.Value (LedgerEra era) ~ L.MaryValue

0 commit comments

Comments
 (0)