diff --git a/cabal.project b/cabal.project index 074ef1f0477..ee4594fb8ab 100644 --- a/cabal.project +++ b/cabal.project @@ -43,3 +43,4 @@ benchmarks: True test-show-details: direct allow-newer: base +allow-newer: plutus-ledger-api diff --git a/hydra-cardano-api/hydra-cardano-api.cabal b/hydra-cardano-api/hydra-cardano-api.cabal index 44d96b1bd61..0079aab438e 100644 --- a/hydra-cardano-api/hydra-cardano-api.cabal +++ b/hydra-cardano-api/hydra-cardano-api.cabal @@ -82,7 +82,7 @@ library , base >=4.16 , base16-bytestring , bytestring - , cardano-api ^>=9.1 + , cardano-api ^>=9.2 , cardano-binary , cardano-crypto-class , cardano-ledger-allegra diff --git a/hydra-cardano-api/src/Hydra/Cardano/Api.hs b/hydra-cardano-api/src/Hydra/Cardano/Api.hs index 0b0817329cd..466d740712e 100644 --- a/hydra-cardano-api/src/Hydra/Cardano/Api.hs +++ b/hydra-cardano-api/src/Hydra/Cardano/Api.hs @@ -386,7 +386,7 @@ type TxBodyContent buidl = Cardano.Api.TxBodyContent buidl Era pattern TxBodyContent :: TxIns buidl -> TxInsCollateral -> - TxInsReference buidl -> + TxInsReference -> [TxOut CtxTx] -> TxTotalCollateral Era -> TxReturnCollateral CtxTx Era -> @@ -404,7 +404,7 @@ pattern TxBodyContent :: TxScriptValidity -> Maybe (Featured ConwayEraOnwards Era (TxProposalProcedures buidl Era)) -> Maybe (Featured ConwayEraOnwards Era (TxVotingProcedures buidl Era)) -> - Maybe (Featured ConwayEraOnwards Era Coin) -> + Maybe (Featured ConwayEraOnwards Era (Maybe Coin)) -> Maybe (Featured ConwayEraOnwards Era Coin) -> TxBodyContent buidl pattern TxBodyContent @@ -515,17 +515,17 @@ type TxIns buidl = [(TxIn, BuildTxWith buidl (Cardano.Api.Witness WitCtxTxIn Era -- ** TxInsReference -type TxInsReference buidl = Cardano.Api.TxInsReference buidl Era +type TxInsReference = Cardano.Api.TxInsReference Era {-# COMPLETE TxInsReferenceNone, TxInsReference #-} -pattern TxInsReferenceNone :: TxInsReference buidl +pattern TxInsReferenceNone :: TxInsReference pattern TxInsReferenceNone <- Cardano.Api.TxInsReferenceNone where TxInsReferenceNone = Cardano.Api.TxInsReferenceNone -pattern TxInsReference :: [TxIn] -> TxInsReference buidl +pattern TxInsReference :: [TxIn] -> TxInsReference pattern TxInsReference{txInsReference'} <- Cardano.Api.TxInsReference _ txInsReference' where diff --git a/hydra-plutus/hydra-plutus.cabal b/hydra-plutus/hydra-plutus.cabal index fce12d16db3..3ea473502af 100644 --- a/hydra-plutus/hydra-plutus.cabal +++ b/hydra-plutus/hydra-plutus.cabal @@ -69,10 +69,10 @@ library , hydra-cardano-api , hydra-plutus-extras , hydra-prelude - , plutus-core >=1.21 - , plutus-ledger-api >=1.21 - , plutus-tx >=1.21 - , plutus-tx-plugin >=1.21 + , plutus-core >=1.31 + , plutus-ledger-api >=1.31 + , plutus-tx >=1.31 + , plutus-tx-plugin >=1.31 , QuickCheck , serialise , template-haskell