Add new Api.Tx.In module

IntersectMBO · Mar 16, 2023 · af84fda · af84fda
1 parent 563aa1c
commit af84fda
Show file tree

Hide file tree

Showing 3 changed files with 29 additions and 0 deletions.
diff --git a/libs/cardano-ledger-api/CHANGELOG.md b/libs/cardano-ledger-api/CHANGELOG.md
@@ -5,6 +5,7 @@
 * Add `Cardano.Ledger.Api.Governance` that exposes all of the governance related types.
 * Addition of `Cardano.Ledger.Api.PParams`
 * Addition of `Cardano.Ledger.Api.Tx.Address`
+* Addition of `Cardano.Ledger.Api.Tx.In`
 * Hide `ShelleyTxBody`, `AlonzoTxBody`, `BabbageTxBody` from `Cardano.Ledger.Api.Tx.Body`
 * Export `Withdrawals` from `Cardano.Ledger.Api.Tx.Body`
 * Export `ShelleyTxAuxData`, `AllegraTxAuxData` and `AlonzoTxAuxData` from

diff --git a/libs/cardano-ledger-api/cardano-ledger-api.cabal b/libs/cardano-ledger-api/cardano-ledger-api.cabal
@@ -31,6 +31,7 @@ library
         Cardano.Ledger.Api.Tx.Address
         Cardano.Ledger.Api.Tx.AuxData
         Cardano.Ledger.Api.Tx.Body
+        Cardano.Ledger.Api.Tx.In
         Cardano.Ledger.Api.Tx.Out
         Cardano.Ledger.Api.Tx.Wits
         Cardano.Ledger.Api.UTxO

diff --git a/libs/cardano-ledger-api/src/Cardano/Ledger/Api/Tx/In.hs b/libs/cardano-ledger-api/src/Cardano/Ledger/Api/Tx/In.hs
@@ -0,0 +1,27 @@
+module Cardano.Ledger.Api.Tx.In (
+  -- * Transaction input
+  TxIn (..),
+
+  -- ** Transaction ID
+  TxId (..),
+  mkTxInPartial,
+
+  -- ** Transaction index
+  TxIx,
+  txIxToInt,
+  txIxFromIntegral,
+  mkTxIxPartial,
+)
+where
+
+import Cardano.Ledger.BaseTypes (
+  TxIx,
+  mkTxIxPartial,
+  txIxFromIntegral,
+  txIxToInt,
+ )
+import Cardano.Ledger.TxIn (
+  TxId (..),
+  TxIn (TxIn),
+  mkTxInPartial,
+ )