fix hlint error

Cmdv · Cmdv · commit 61103a4236af · 2025-11-13T10:21:33.000Z
diff --git a/cardano-db-sync/src/Cardano/DbSync/Ledger/Types.hs b/cardano-db-sync/src/Cardano/DbSync/Ledger/Types.hs
@@ -186,8 +186,8 @@ updatedCommittee membersToRemove membersToAdd newQuorum committee =
             newCommitteeMembers
             newQuorum
 
-data LedgerDB = LedgerDB
-  { ledgerDbCheckpoints :: !(AnchoredSeq (WithOrigin SlotNo) CardanoLedgerState CardanoLedgerState)
+newtype LedgerDB = LedgerDB
+  { ledgerDbCheckpoints :: AnchoredSeq (WithOrigin SlotNo) CardanoLedgerState CardanoLedgerState
   }
 
 instance Anchorable (WithOrigin SlotNo) CardanoLedgerState CardanoLedgerState where

Original file line number	Diff line number	Diff line change
`@@ -186,8 +186,8 @@ updatedCommittee membersToRemove membersToAdd newQuorum committee =`
`186`	`186`	`newCommitteeMembers`
`187`	`187`	`newQuorum`
`188`	`188`
`189`		`-data LedgerDB = LedgerDB`
`190`		`- { ledgerDbCheckpoints :: !(AnchoredSeq (WithOrigin SlotNo) CardanoLedgerState CardanoLedgerState)`
	`189`	`+newtype LedgerDB = LedgerDB`
	`190`	`+ { ledgerDbCheckpoints :: AnchoredSeq (WithOrigin SlotNo) CardanoLedgerState CardanoLedgerState`
`191`	`191`	`}`
`192`	`192`
`193`	`193`	`instance Anchorable (WithOrigin SlotNo) CardanoLedgerState CardanoLedgerState where`