Add golden test for queryStakeSnapshots

Author: aniketd

libs/cardano-ledger-api/golden/conway/cbor/queryStakeSnapshots.cbor

@@ -64,6 +64,7 @@ import Test.Cardano.Ledger.Api.State.Query.Examples (
   queryStakePoolDefaultVoteExamples,
   queryStakePoolDelegsAndRewardsExamples,
   queryStakePoolRelaysExamples,
+  queryStakeSnapshotsExamples,
  )
 import Test.Cardano.Ledger.Binary.Golden (cborGoldenSpec)
 import Test.Cardano.Ledger.Binary.Random
@@ -162,6 +163,7 @@ latestErasSpec =
         "queryStakePoolDelegsAndRewards"
         queryStakePoolDelegsAndRewardsExamples
       eraLedgerStateQueryGoldenSpec @era "queryStakePoolRelays" queryStakePoolRelaysExamples
+      eraLedgerStateQueryCBORGoldenSpec @era "queryStakeSnapshots" queryStakeSnapshotsExamples
     describe "Roundtrip" $ do
       prop "QueryPoolStateResult" $ roundTripEraExpectation @era @QueryPoolStateResult
       prop "StakeSnapshots" $ roundTripEraExpectation @era @StakeSnapshots

libs/cardano-ledger-api/golden/dijkstra/cbor/queryStakeSnapshots.cbor

@@ -21,11 +21,17 @@ module Test.Cardano.Ledger.Api.State.Query.Examples (
   queryStakePoolDefaultVoteExamples,
   queryStakePoolDelegsAndRewardsExamples,
   queryStakePoolRelaysExamples,
+  queryStakeSnapshotsExamples,
 ) where
 
 import Cardano.Base.IP (toIPv4, toIPv6)
 import Cardano.Ledger.Api.Governance (Constitution (..))
-import Cardano.Ledger.Api.State.Query (DefaultVote (..), QueryPoolStateResult (..))
+import Cardano.Ledger.Api.State.Query (
+  DefaultVote (..),
+  QueryPoolStateResult (..),
+  StakeSnapshot (..),
+  StakeSnapshots (..),
+ )
 import Cardano.Ledger.BaseTypes (AnchorData, EpochNo (..), Port (..), StrictMaybe (..), textToDns)
 import Cardano.Ledger.Coin (Coin (..), CompactForm (..), knownNonZeroCoin)
 import Cardano.Ledger.Credential (Credential (..))
@@ -304,3 +310,36 @@ queryPoolStateExamples =
             ]
       }
   ]
+
+queryStakeSnapshotsExamples :: [StakeSnapshots]
+queryStakeSnapshotsExamples =
+  [ StakeSnapshots
+      Map.empty
+      (knownNonZeroCoin @1)
+      (knownNonZeroCoin @1)
+      (knownNonZeroCoin @1)
+  , StakeSnapshots
+      { ssStakeSnapshots =
+          Map.fromList
+            [
+              ( mkKeyHash 1
+              , StakeSnapshot
+                  { ssMarkPool = Coin 1_000_000_000
+                  , ssSetPool = Coin 900_000_000
+                  , ssGoPool = Coin 800_000_000
+                  }
+              )
+            ,
+              ( mkKeyHash 2
+              , StakeSnapshot
+                  { ssMarkPool = Coin 0
+                  , ssSetPool = Coin 500_000_000
+                  , ssGoPool = Coin 250_000_000
+                  }
+              )
+            ]
+      , ssMarkTotal = knownNonZeroCoin @5_000_000_000
+      , ssSetTotal = knownNonZeroCoin @4_500_000_000
+      , ssGoTotal = knownNonZeroCoin @4_000_000_000
+      }
+  ]