diff --git a/cardano-api/gen/Test/Gen/Cardano/Api/ProtocolParameters.hs b/cardano-api/gen/Test/Gen/Cardano/Api/ProtocolParameters.hs index 8a0d0cf7ee..84ab63c241 100644 --- a/cardano-api/gen/Test/Gen/Cardano/Api/ProtocolParameters.hs +++ b/cardano-api/gen/Test/Gen/Cardano/Api/ProtocolParameters.hs @@ -75,6 +75,7 @@ genIntroducedInConwayPParams = <*> genStrictMaybe Q.arbitrary <*> genStrictMaybe Q.arbitrary <*> genStrictMaybe Q.arbitrary + <*> genStrictMaybe Q.arbitrary genShelleyEraBasedProtocolParametersUpdate :: MonadGen m => m (EraBasedProtocolParametersUpdate ShelleyEra) genShelleyEraBasedProtocolParametersUpdate = diff --git a/cardano-api/internal/Cardano/Api/ProtocolParameters.hs b/cardano-api/internal/Cardano/Api/ProtocolParameters.hs index 66cca504eb..a5706dd282 100644 --- a/cardano-api/internal/Cardano/Api/ProtocolParameters.hs +++ b/cardano-api/internal/Cardano/Api/ProtocolParameters.hs @@ -253,6 +253,7 @@ data IntroducedInConwayPParams era , icGovActionDeposit :: StrictMaybe Ledger.Coin , icDRepDeposit :: StrictMaybe Ledger.Coin , icDRepActivity :: StrictMaybe Ledger.EpochInterval + , icMinFeeRefScriptCostPerByte :: StrictMaybe Ledger.NonNegativeInterval } deriving Show @@ -270,6 +271,7 @@ createIntroducedInConwayPParams IntroducedInConwayPParams{..} = & Ledger.ppuGovActionDepositL .~ icGovActionDeposit & Ledger.ppuDRepDepositL .~ icDRepDeposit & Ledger.ppuDRepActivityL .~ icDRepActivity + & Ledger.ppuMinFeeRefScriptCostPerByteL .~ icMinFeeRefScriptCostPerByte createEraBasedProtocolParamUpdate