Fourmolize

kderme · kderme · commit 0da6f8a289e8 · 2023-08-09T10:05:14.000+03:00
diff --git a/cardano-chain-gen/src/Cardano/Mock/Forging/Interpreter.hs b/cardano-chain-gen/src/Cardano/Mock/Forging/Interpreter.hs
@@ -43,6 +43,14 @@ import qualified Cardano.Mock.Forging.Tx.Babbage as Babbage
 import qualified Cardano.Mock.Forging.Tx.Shelley as Shelley
 import Cardano.Mock.Forging.Types
 import Cardano.Prelude (bimap, throwIO)
+import Control.Concurrent.Class.MonadSTM.Strict (
+  StrictTVar,
+  atomically,
+  modifyTVar,
+  newTVarIO,
+  readTVarIO,
+  swapTVar,
+ )
 import Control.Monad (forM, void, when)
 import Control.Monad.Except (runExcept)
 import Control.Tracer (Tracer)
@@ -113,14 +121,6 @@ import Ouroboros.Consensus.Shelley.Ledger (ShelleyBlock, Ticked, shelleyLedgerSt
 import qualified Ouroboros.Consensus.Shelley.Ledger.Mempool as Consensus
 import Ouroboros.Consensus.Shelley.Ledger.SupportsProtocol ()
 import qualified Ouroboros.Consensus.TypeFamilyWrappers as Consensus
-import Control.Concurrent.Class.MonadSTM.Strict (
-  StrictTVar,
-  atomically,
-  newTVarIO,
-  readTVarIO,
-  modifyTVar,
-  swapTVar,
- )
 import Ouroboros.Consensus.Util.IOLike (
   Exception,
   NoThunks,
diff --git a/cardano-chain-gen/src/Cardano/Mock/Forging/Tx/Alonzo.hs b/cardano-chain-gen/src/Cardano/Mock/Forging/Tx/Alonzo.hs
@@ -55,6 +55,7 @@ import Cardano.Ledger.Shelley.TxBody (
   PoolParams (..),
   StakePoolRelay (..),
  )
+import Cardano.Ledger.Shelley.TxCert
 import Cardano.Ledger.TxIn (TxIn (..))
 import Cardano.Mock.Forging.Crypto
 import Cardano.Mock.Forging.Tx.Alonzo.ScriptsExamples
@@ -71,7 +72,6 @@ import Lens.Micro
 import Ouroboros.Consensus.Cardano.Block (LedgerState, StandardAlonzo)
 import Ouroboros.Consensus.Shelley.Eras (StandardCrypto)
 import Ouroboros.Consensus.Shelley.Ledger (ShelleyBlock)
-import Cardano.Ledger.Shelley.TxCert
 
 type AlonzoUTxOIndex = UTxOIndex StandardAlonzo
 
diff --git a/cardano-chain-gen/src/Cardano/Mock/Forging/Tx/Alonzo/Scenarios.hs b/cardano-chain-gen/src/Cardano/Mock/Forging/Tx/Alonzo/Scenarios.hs
@@ -4,13 +4,13 @@ module Cardano.Mock.Forging.Tx.Alonzo.Scenarios (
 
 import Cardano.Ledger.Mary.Value
 import Cardano.Ledger.Shelley.API
+import Cardano.Ledger.Shelley.TxCert
 import Cardano.Mock.Forging.Interpreter
 import qualified Cardano.Mock.Forging.Tx.Alonzo as Alonzo
 import Cardano.Mock.Forging.Tx.Generic
 import Cardano.Mock.Forging.Types
 import Cardano.Prelude hiding (length, (.))
 import Data.List.Extra
-import Cardano.Ledger.Shelley.TxCert
 
 delegateAndSendBlocks :: Int -> Interpreter -> IO [CardanoBlock]
 delegateAndSendBlocks n interpreter = do
diff --git a/cardano-chain-gen/src/Cardano/Mock/Forging/Tx/Babbage.hs b/cardano-chain-gen/src/Cardano/Mock/Forging/Tx/Babbage.hs
@@ -76,6 +76,7 @@ import Cardano.Ledger.Shelley.TxBody (
   PoolParams (..),
   StakePoolRelay (..),
  )
+import Cardano.Ledger.Shelley.TxCert
 import Cardano.Ledger.Shelley.UTxO
 import Cardano.Ledger.TxIn (TxId, TxIn (..))
 import Cardano.Ledger.Val
@@ -96,7 +97,6 @@ import Lens.Micro
 import Ouroboros.Consensus.Cardano.Block (LedgerState)
 import Ouroboros.Consensus.Shelley.Eras (StandardBabbage, StandardCrypto)
 import Ouroboros.Consensus.Shelley.Ledger (ShelleyBlock)
-import Cardano.Ledger.Shelley.TxCert
 
 type BabbageUTxOIndex = UTxOIndex StandardBabbage
 
diff --git a/cardano-chain-gen/src/Cardano/Mock/Forging/Tx/Babbage/Scenarios.hs b/cardano-chain-gen/src/Cardano/Mock/Forging/Tx/Babbage/Scenarios.hs
@@ -4,13 +4,13 @@ module Cardano.Mock.Forging.Tx.Babbage.Scenarios (
 
 import Cardano.Ledger.Mary.Value
 import Cardano.Ledger.Shelley.API
+import Cardano.Ledger.Shelley.TxCert
 import Cardano.Mock.Forging.Interpreter
 import qualified Cardano.Mock.Forging.Tx.Babbage as Babbage
 import Cardano.Mock.Forging.Tx.Generic
 import Cardano.Mock.Forging.Types
 import Cardano.Prelude hiding (length, (.))
 import Data.List.Extra
-import Cardano.Ledger.Shelley.TxCert
 
 delegateAndSendBlocks :: Int -> Interpreter -> IO [CardanoBlock]
 delegateAndSendBlocks n interpreter = do
diff --git a/cardano-chain-gen/src/Cardano/Mock/Forging/Tx/Generic.hs b/cardano-chain-gen/src/Cardano/Mock/Forging/Tx/Generic.hs
@@ -36,6 +36,7 @@ import Cardano.Ledger.Hashes (ScriptHash (ScriptHash))
 import Cardano.Ledger.Keys
 import Cardano.Ledger.Shelley.LedgerState hiding (LedgerState)
 import Cardano.Ledger.Shelley.TxBody
+import Cardano.Ledger.Shelley.TxCert
 import Cardano.Ledger.Shelley.UTxO
 import Cardano.Ledger.TxIn (TxIn (..))
 import qualified Cardano.Ledger.UMap as UMap
@@ -52,7 +53,6 @@ import Ouroboros.Consensus.Cardano.Block (LedgerState)
 import Ouroboros.Consensus.Shelley.Eras (StandardCrypto)
 import Ouroboros.Consensus.Shelley.Ledger (ShelleyBlock)
 import qualified Ouroboros.Consensus.Shelley.Ledger.Ledger as Consensus
-import Cardano.Ledger.Shelley.TxCert
 
 resolveAddress ::
   forall era p.
diff --git a/cardano-chain-gen/src/Cardano/Mock/Forging/Tx/Shelley.hs b/cardano-chain-gen/src/Cardano/Mock/Forging/Tx/Shelley.hs
@@ -22,6 +22,7 @@ import Cardano.Ledger.Credential
 import Cardano.Ledger.Shelley.Tx hiding (ShelleyTx)
 import qualified Cardano.Ledger.Shelley.Tx as ShelleyTx
 import Cardano.Ledger.Shelley.TxBody
+import Cardano.Ledger.Shelley.TxCert
 import Cardano.Mock.Forging.Tx.Generic
 import Cardano.Mock.Forging.Types
 import Cardano.Prelude
@@ -33,7 +34,6 @@ import Lens.Micro
 import Ouroboros.Consensus.Cardano.Block (LedgerState, StandardShelley)
 import Ouroboros.Consensus.Shelley.Eras (ShelleyEra, StandardCrypto)
 import Ouroboros.Consensus.Shelley.Ledger (ShelleyBlock)
-import Cardano.Ledger.Shelley.TxCert
 
 type ShelleyUTxOIndex = UTxOIndex (ShelleyEra StandardCrypto)
 
diff --git a/cardano-chain-gen/test/Test/Cardano/Db/Mock/Config.hs b/cardano-chain-gen/test/Test/Cardano/Db/Mock/Config.hs
@@ -1,12 +1,12 @@
 {-# LANGUAGE OverloadedStrings #-}
+{-# LANGUAGE RecordWildCards #-}
 {-# LANGUAGE ScopedTypeVariables #-}
 {-# LANGUAGE TypeApplications #-}
-{-# LANGUAGE RecordWildCards #-}
 
 module Test.Cardano.Db.Mock.Config (
   Config (..),
   DBSyncEnv (..),
-  CommandLineArgs(..),
+  CommandLineArgs (..),
   TxOutParam (..),
   initCommandLineArgs,
   babbageConfigDir,
@@ -70,14 +70,14 @@ import Data.Text (Text)
 import qualified Data.Text as Text
 import Database.Persist.Postgresql (createPostgresqlPool)
 import Database.Persist.Sql (SqlBackend)
+import Ouroboros.Consensus.Block.Forging
 import Ouroboros.Consensus.Config (TopLevelConfig)
 import qualified Ouroboros.Consensus.Node.ProtocolInfo as Consensus
 import Ouroboros.Consensus.Shelley.Eras (StandardCrypto)
 import Ouroboros.Consensus.Shelley.Node (ShelleyLeaderCredentials)
 import System.Directory (createDirectoryIfMissing, removePathForcibly)
 import System.FilePath.Posix ((</>))
 import System.IO.Silently (hSilence)
-import Ouroboros.Consensus.Block.Forging
 
 data Config = Config
   { topLevelConfig :: TopLevelConfig CardanoBlock
@@ -230,7 +230,7 @@ mkShelleyCredentials bulkFile = do
 
 -- | staticDir can be shared by tests running in parallel. mutableDir not.
 mkSyncNodeParams :: FilePath -> FilePath -> CommandLineArgs -> IO SyncNodeParams
-mkSyncNodeParams staticDir mutableDir CommandLineArgs{..} = do
+mkSyncNodeParams staticDir mutableDir CommandLineArgs {..} = do
   pgconfig <- orDie Db.renderPGPassError $ newExceptT Db.readPGPassDefault
   pure $
     SyncNodeParams
@@ -261,22 +261,22 @@ mkSyncNodeParams staticDir mutableDir CommandLineArgs{..} = do
 initCommandLineArgs :: CommandLineArgs
 initCommandLineArgs =
   CommandLineArgs
-  { claHasConfigFile = True
-  , claEpochDisabled = True
-  , claHasCache = True
-  , claShouldUseLedger = True
-  , claSkipFix = True
-  , claOnlyFix = False
-  , claForceIndexes = False
-  , claHasMultiAssets = True
-  , claHasMetadata = True
-  , claHasPlutusExtra = True
-  , claHasOfflineData = True
-  , claTurboMode = False
-  , claFullMode = True
-  , claMigrateConsumed = True
-  , claPruneTxOut = True
-  }
+    { claHasConfigFile = True
+    , claEpochDisabled = True
+    , claHasCache = True
+    , claShouldUseLedger = True
+    , claSkipFix = True
+    , claOnlyFix = False
+    , claForceIndexes = False
+    , claHasMultiAssets = True
+    , claHasMetadata = True
+    , claHasPlutusExtra = True
+    , claHasOfflineData = True
+    , claTurboMode = False
+    , claFullMode = True
+    , claMigrateConsumed = True
+    , claPruneTxOut = True
+    }
 
 emptyMetricsSetters :: MetricSetters
 emptyMetricsSetters =
diff --git a/cardano-chain-gen/test/Test/Cardano/Db/Mock/Unit/Alonzo/Reward.hs b/cardano-chain-gen/test/Test/Cardano/Db/Mock/Unit/Alonzo/Reward.hs
@@ -13,8 +13,8 @@ module Test.Cardano.Db.Mock.Unit.Alonzo.Reward (
 
 import Cardano.Ledger.Coin (Coin (Coin), DeltaCoin (DeltaCoin))
 import Cardano.Ledger.Keys (KeyHash (KeyHash))
-import Cardano.Ledger.Shelley.TxCert
 import Cardano.Ledger.Shelley.TxBody (Withdrawals (Withdrawals))
+import Cardano.Ledger.Shelley.TxCert
 import Cardano.Mock.ChainSync.Server (IOManager, addBlock, rollback)
 import qualified Cardano.Mock.Forging.Tx.Alonzo as Alonzo
 import Cardano.Mock.Forging.Tx.Alonzo.Scenarios (delegateAndSendBlocks)
diff --git a/cardano-chain-gen/test/Test/Cardano/Db/Mock/Unit/Alonzo/Stake.hs b/cardano-chain-gen/test/Test/Cardano/Db/Mock/Unit/Alonzo/Stake.hs
@@ -17,8 +17,8 @@ module Test.Cardano.Db.Mock.Unit.Alonzo.Stake (
 
 import qualified Cardano.Db as DB
 import Cardano.Ledger.BaseTypes (CertIx (CertIx), TxIx (TxIx))
-import Cardano.Ledger.Shelley.TxCert
 import Cardano.Ledger.Shelley.TxBody (Ptr (..))
+import Cardano.Ledger.Shelley.TxCert
 import Cardano.Mock.ChainSync.Server (IOManager, addBlock)
 import qualified Cardano.Mock.Forging.Tx.Alonzo as Alonzo
 import Cardano.Mock.Forging.Tx.Alonzo.Scenarios (delegateAndSendBlocks)
diff --git a/cardano-chain-gen/test/Test/Cardano/Db/Mock/Unit/Babbage/CommandLineArg/EpochDisabled.hs b/cardano-chain-gen/test/Test/Cardano/Db/Mock/Unit/Babbage/CommandLineArg/EpochDisabled.hs
@@ -10,7 +10,7 @@ import qualified Cardano.Mock.Forging.Tx.Babbage as Babbage
 import Cardano.Mock.Forging.Types (UTxOIndex (..))
 import Control.Monad (void)
 import Data.Text (Text)
-import Test.Cardano.Db.Mock.Config (CommandLineArgs (..), babbageConfigDir, startDBSync, withCustomConfig, initCommandLineArgs)
+import Test.Cardano.Db.Mock.Config (CommandLineArgs (..), babbageConfigDir, initCommandLineArgs, startDBSync, withCustomConfig)
 import Test.Cardano.Db.Mock.UnifiedApi (forgeAndSubmitBlocks, withBabbageFindLeaderAndSubmitTx)
 import Test.Cardano.Db.Mock.Validate (assertBlockNoBackoff, assertEqQuery)
 import Test.Tasty.HUnit (Assertion)
diff --git a/cardano-chain-gen/test/Test/Cardano/Db/Mock/Unit/Babbage/CommandLineArg/ForceIndex.hs b/cardano-chain-gen/test/Test/Cardano/Db/Mock/Unit/Babbage/CommandLineArg/ForceIndex.hs
@@ -2,17 +2,17 @@
 
 module Test.Cardano.Db.Mock.Unit.Babbage.CommandLineArg.ForceIndex (
   checkForceIndexesArg,
-  checkNoForceIndexesArg
+  checkNoForceIndexesArg,
 )
 where
 
+import qualified Cardano.Db as DB
 import Cardano.Mock.ChainSync.Server (IOManager)
 import Data.Text (Text)
-import Test.Cardano.Db.Mock.Config (CommandLineArgs (..), babbageConfigDir, initCommandLineArgs, withCustomConfig, startDBSync)
-import Test.Tasty.HUnit (Assertion)
-import qualified Cardano.Db as DB
-import Test.Cardano.Db.Mock.Validate (assertEqQuery)
 import GHC.Conc.IO (threadDelay)
+import Test.Cardano.Db.Mock.Config (CommandLineArgs (..), babbageConfigDir, initCommandLineArgs, startDBSync, withCustomConfig)
+import Test.Cardano.Db.Mock.Validate (assertEqQuery)
+import Test.Tasty.HUnit (Assertion)
 
 checkForceIndexesArg :: IOManager -> [(Text, Text)] -> Assertion
 checkForceIndexesArg =
diff --git a/cardano-chain-gen/test/Test/Cardano/Db/Mock/Unit/Babbage/CommandLineArg/MigrateConsumedPruneTxOut.hs b/cardano-chain-gen/test/Test/Cardano/Db/Mock/Unit/Babbage/CommandLineArg/MigrateConsumedPruneTxOut.hs
@@ -22,7 +22,7 @@ import Control.Concurrent.Class.MonadSTM.Strict (atomically)
 import Control.Monad (void)
 import Data.Text (Text)
 import Ouroboros.Consensus.Block (blockPoint)
-import Test.Cardano.Db.Mock.Config (CommandLineArgs (..), TxOutParam (..), babbageConfigDir, startDBSync, withCustomConfig, initCommandLineArgs)
+import Test.Cardano.Db.Mock.Config (CommandLineArgs (..), TxOutParam (..), babbageConfigDir, initCommandLineArgs, startDBSync, withCustomConfig)
 import Test.Cardano.Db.Mock.Examples (mockBlock0, mockBlock1)
 import Test.Cardano.Db.Mock.UnifiedApi (
   forgeAndSubmitBlocks,
diff --git a/cardano-chain-gen/test/Test/Cardano/Db/Mock/Unit/Babbage/Reward.hs b/cardano-chain-gen/test/Test/Cardano/Db/Mock/Unit/Babbage/Reward.hs
@@ -14,10 +14,10 @@ module Test.Cardano.Db.Mock.Unit.Babbage.Reward (
 
 import Cardano.Ledger.Coin (Coin (Coin), DeltaCoin (DeltaCoin))
 import Cardano.Ledger.Keys (KeyHash (KeyHash))
-import Cardano.Ledger.Shelley.TxCert
 import Cardano.Ledger.Shelley.TxBody (
   Withdrawals (..),
  )
+import Cardano.Ledger.Shelley.TxCert
 import Cardano.Mock.ChainSync.Server (IOManager, addBlock, rollback)
 import Cardano.Mock.Forging.Interpreter (withShelleyLedgerState)
 import qualified Cardano.Mock.Forging.Tx.Babbage as Babbage
diff --git a/cardano-chain-gen/test/Test/Cardano/Db/Mock/Unit/Babbage/Rollback.hs b/cardano-chain-gen/test/Test/Cardano/Db/Mock/Unit/Babbage/Rollback.hs
@@ -13,8 +13,8 @@ module Test.Cardano.Db.Mock.Unit.Babbage.Rollback (
 )
 where
 
-import Cardano.Mock.ChainSync.Server (IOManager, addBlock, rollback)
 import Cardano.Ledger.Shelley.TxCert
+import Cardano.Mock.ChainSync.Server (IOManager, addBlock, rollback)
 import Cardano.Mock.Forging.Interpreter (forgeNext)
 import qualified Cardano.Mock.Forging.Tx.Babbage as Babbage
 import Cardano.Mock.Forging.Tx.Generic (resolvePool)
diff --git a/cardano-db-sync/src/Cardano/DbSync/Config/Cardano.hs b/cardano-db-sync/src/Cardano/DbSync/Config/Cardano.hs
@@ -30,8 +30,10 @@ import Cardano.Ledger.Conway.Genesis
 import Cardano.Ledger.Keys
 import Cardano.Ledger.Shelley.Translation (emptyFromByronTranslationContext)
 import Cardano.Prelude (panic)
+import Cardano.Slotting.Slot
 import Control.Monad.Trans.Except (ExceptT)
 import Data.Word (Word64)
+import Ouroboros.Consensus.Block.Forging
 import Ouroboros.Consensus.Cardano (Nonce (..), ProtVer (ProtVer))
 import qualified Ouroboros.Consensus.Cardano as Consensus
 import qualified Ouroboros.Consensus.Cardano.Node as Consensus
@@ -43,8 +45,6 @@ import qualified Ouroboros.Consensus.Node.ProtocolInfo as Consensus
 import Ouroboros.Consensus.Shelley.Eras (StandardCrypto)
 import Ouroboros.Consensus.Shelley.Node (ShelleyGenesis (..))
 import qualified Ouroboros.Consensus.Shelley.Node.Praos as Consensus
-import Ouroboros.Consensus.Block.Forging
-import Cardano.Slotting.Slot
 
 -- Usually only one constructor, but may have two when we are preparing for a HFC event.
 data GenesisConfig
diff --git a/cardano-db-sync/src/Cardano/DbSync/Era/Shelley/Generic/Tx/Alonzo.hs b/cardano-db-sync/src/Cardano/DbSync/Era/Shelley/Generic/Tx/Alonzo.hs
@@ -16,7 +16,7 @@ module Cardano.DbSync.Era.Shelley.Generic.Tx.Alonzo (
   extraKeyWits,
   getPlutusSizes,
   getScripts,
-txDataWitness,
+  txDataWitness,
   rmWdrl,
   rmCerts,
   rmInps,
@@ -51,6 +51,7 @@ import qualified Cardano.Ledger.SafeHash as Ledger
 import Cardano.Ledger.Shelley.Scripts (ScriptHash)
 import qualified Cardano.Ledger.Shelley.Tx as ShelleyTx
 import qualified Cardano.Ledger.Shelley.TxBody as Shelley
+import Cardano.Ledger.Shelley.TxCert as Shelley
 import Cardano.Prelude
 import qualified Data.Aeson as Aeson
 import qualified Data.ByteString.Lazy.Char8 as LBS
@@ -59,7 +60,6 @@ import qualified Data.Map.Strict as Map
 import qualified Data.Set as Set
 import Lens.Micro
 import Ouroboros.Consensus.Cardano.Block (EraCrypto, StandardAlonzo, StandardCrypto)
-import Cardano.Ledger.Shelley.TxCert as Shelley
 
 fromAlonzoTx :: Bool -> Maybe Alonzo.Prices -> (Word64, Core.Tx StandardAlonzo) -> Tx
 fromAlonzoTx ioExtraPlutus mprices (blkIndex, tx) =
diff --git a/cardano-db-sync/src/Cardano/DbSync/Era/Shelley/Generic/Tx/Babbage.hs b/cardano-db-sync/src/Cardano/DbSync/Era/Shelley/Generic/Tx/Babbage.hs
@@ -1,6 +1,6 @@
 {-# LANGUAGE DataKinds #-}
-{-# LANGUAGE GADTs #-}
 {-# LANGUAGE ExplicitForAll #-}
+{-# LANGUAGE GADTs #-}
 {-# LANGUAGE RankNTypes #-}
 {-# LANGUAGE ScopedTypeVariables #-}
 {-# LANGUAGE TypeApplications #-}
@@ -22,6 +22,7 @@ import qualified Cardano.Ledger.Address as Ledger
 import qualified Cardano.Ledger.Alonzo.Scripts as Alonzo
 import qualified Cardano.Ledger.Alonzo.Scripts.Data as Alonzo
 import qualified Cardano.Ledger.Alonzo.Tx as Alonzo
+import Cardano.Ledger.Babbage.Core as Core hiding (Tx, TxOut)
 import Cardano.Ledger.Babbage.TxBody (BabbageTxOut)
 import qualified Cardano.Ledger.Babbage.TxBody as Babbage
 import Cardano.Ledger.BaseTypes
@@ -34,7 +35,6 @@ import qualified Data.ByteString.Short as SBS
 import qualified Data.Map.Strict as Map
 import Lens.Micro
 import Ouroboros.Consensus.Shelley.Eras (StandardBabbage, StandardCrypto)
-import Cardano.Ledger.Babbage.Core as Core hiding (TxOut, Tx)
 
 fromBabbageTx :: Bool -> Maybe Alonzo.Prices -> (Word64, Core.Tx StandardBabbage) -> Tx
 fromBabbageTx ioExtraPlutus mprices (blkIndex, tx) =
@@ -113,7 +113,10 @@ fromTxOut ::
   , Core.Value era ~ MaryValue (EraCrypto era)
   , Core.TxOut era ~ BabbageTxOut era
   , Core.Script era ~ Alonzo.AlonzoScript era
-  ) => Word64 -> BabbageTxOut era -> TxOut
+  ) =>
+  Word64 ->
+  BabbageTxOut era ->
+  TxOut
 fromTxOut index txOut =
   TxOut
     { txOutIndex = index
diff --git a/cardano-db-sync/src/Cardano/DbSync/Era/Shelley/Generic/Tx/Conway.hs b/cardano-db-sync/src/Cardano/DbSync/Era/Shelley/Generic/Tx/Conway.hs
diff --git a/cardano-db-sync/src/Cardano/DbSync/Era/Shelley/Generic/Tx/Shelley.hs b/cardano-db-sync/src/Cardano/DbSync/Era/Shelley/Generic/Tx/Shelley.hs
diff --git a/cardano-db-sync/src/Cardano/DbSync/Era/Shelley/Generic/Tx/Types.hs b/cardano-db-sync/src/Cardano/DbSync/Era/Shelley/Generic/Tx/Types.hs
diff --git a/cardano-db-sync/src/Cardano/DbSync/Era/Shelley/Generic/Witness.hs b/cardano-db-sync/src/Cardano/DbSync/Era/Shelley/Generic/Witness.hs
diff --git a/cardano-db-sync/src/Cardano/DbSync/Era/Shelley/Insert.hs b/cardano-db-sync/src/Cardano/DbSync/Era/Shelley/Insert.hs
diff --git a/cardano-db-sync/src/Cardano/DbSync/Sync.hs b/cardano-db-sync/src/Cardano/DbSync/Sync.hs
diff --git a/cardano-db/src/Cardano/Db.hs b/cardano-db/src/Cardano/Db.hs
diff --git a/cardano-db/src/Cardano/Db/Migration/Extra/CosnumedTxOut/Queries.hs b/cardano-db/src/Cardano/Db/Migration/Extra/CosnumedTxOut/Queries.hs
diff --git a/cardano-db/src/Cardano/Db/Query.hs b/cardano-db/src/Cardano/Db/Query.hs
