Update Cardano.Api.ReexposeLedger to expose AnchorData and

hashAnchorData
IntersectMBO · Aug 22, 2023 · 1e6c852 · 1e6c852
1 parent 9183a67
commit 1e6c852
Showing 1 changed file with 18 additions and 7 deletions.
diff --git a/cardano-api/internal/Cardano/Api/ReexposeLedger.hs b/cardano-api/internal/Cardano/Api/ReexposeLedger.hs
@@ -1,6 +1,5 @@
 module Cardano.Api.ReexposeLedger
-  ( module Cardano.Ledger.Api
-  , Credential (..)
+  ( Credential (..)
   , KeyHash(..)
   , KeyRole(..)
   , ShelleyTxCert(..)
@@ -22,19 +21,27 @@ module Cardano.Api.ReexposeLedger
   , EraCrypto
   , Network(..)
   , PoolCert(..)
+  , PParams(..)
   , addDeltaCoin
   , toDeltaCoin
   , toEraCBOR
   , fromEraCBOR
 
   -- Conway
+  , Delegatee(..)
   , DRep(..)
   , ConwayTxCert(..)
   , ConwayDelegCert(..)
   , ConwayEraTxCert(..)
   , ConwayGovCert(..)
+  , GovActionId(..)
+  , Vote (..)
+  , Voter (..)
+  , VotingProcedure(..)
 
   -- Base
+  , AnchorData (..)
+  , hashAnchorData
   , boundRational
   , unboundRational
   , DnsName
@@ -50,21 +57,25 @@ module Cardano.Api.ReexposeLedger
   -- Crypto
   , hashToBytes
   , hashFromBytes
+  , StandardCrypto
 
   -- Slotting
   , EpochNo(..)
   ) where
 
 import           Cardano.Crypto.Hash.Class (hashFromBytes, hashToBytes)
-import           Cardano.Ledger.Api
 import           Cardano.Ledger.BaseTypes (DnsName, Network (..), StrictMaybe (..), Url,
-                   boundRational, dnsToText, maybeToStrictMaybe, portToWord16, strictMaybeToMaybe,
-                   textToDns, textToUrl, unboundRational, urlToText)
+                   boundRational, dnsToText, hashAnchorData, maybeToStrictMaybe, portToWord16,
+                   strictMaybeToMaybe, textToDns, textToUrl, unboundRational, urlToText)
 import           Cardano.Ledger.Coin (Coin (..), addDeltaCoin, toDeltaCoin)
+import           Cardano.Ledger.Conway.Governance (AnchorData (..), GovActionId (..), Vote (..),
+                   Voter (..), VotingProcedure (..))
 import           Cardano.Ledger.Conway.TxCert (ConwayDelegCert (..), ConwayEraTxCert (..),
-                   ConwayGovCert (..), ConwayTxCert (..))
-import           Cardano.Ledger.Core (DRep (..), EraCrypto, PoolCert (..), fromEraCBOR, toEraCBOR)
+                   ConwayGovCert (..), ConwayTxCert (..), Delegatee (..))
+import           Cardano.Ledger.Core (DRep (..), EraCrypto, PParams (..), PoolCert (..),
+                   fromEraCBOR, toEraCBOR)
 import           Cardano.Ledger.Credential (Credential (..))
+import           Cardano.Ledger.Crypto (StandardCrypto)
 import           Cardano.Ledger.Keys (HasKeyRole (..), KeyHash (..), KeyRole (..))
 import           Cardano.Ledger.PoolParams (PoolMetadata (..), PoolParams (..), StakePoolRelay (..))
 import           Cardano.Ledger.Shelley.TxCert (EraTxCert (..), GenesisDelegCert (..), MIRCert (..),