Skip to content

Commit

Permalink
Feat 30: V1 Endpoints support - support for endpoints needed for Atlas
Browse files Browse the repository at this point in the history
  • Loading branch information
sourabhxyz committed Jul 9, 2023
1 parent 0a40d86 commit a46e05f
Showing 1 changed file with 5 additions and 5 deletions.
10 changes: 5 additions & 5 deletions src/Maestro/Types/V1/General.hs
Original file line number Diff line number Diff line change
Expand Up @@ -5,7 +5,7 @@ module Maestro.Types.V1.General
SystemStart (..)
-- * Types for @/era-history@ endpoint
, EraSummaries (..)
, EraSummaryData (..)
, EraSummary (..)
, EraParameters (..)
, EraBound (..)
-- * Types for @/protocol-params@ endpoint
Expand Down Expand Up @@ -59,16 +59,16 @@ data SystemStart = SystemStart

-- | Network era summaries.
data EraSummaries = EraSummaries
{ _eraSummariesData :: ![EraSummaryData]
-- ^ Era summaries, see `EraSummaryData`.
{ _eraSummariesData :: ![EraSummary]
-- ^ Era summaries, see `EraSummary`.
, _eraSummariesLastUpdated :: !LastUpdated
-- ^ See `LastUpdated`.
}
deriving stock (Eq, Show, Generic)
deriving (FromJSON, ToJSON) via CustomJSON '[FieldLabelModifier '[StripPrefix "_eraSummaries", LowerFirst]] EraSummaries

-- | Network era summary.
data EraSummaryData = EraSummaryData
data EraSummary = EraSummary
{ _eraSummaryDataStart :: !EraBound
-- ^ Start of this era.
, _eraSummaryDataEnd :: !(Maybe EraBound)
Expand All @@ -77,7 +77,7 @@ data EraSummaryData = EraSummaryData
-- ^ Parameters of this era.
}
deriving stock (Eq, Show, Generic)
deriving (FromJSON, ToJSON) via CustomJSON '[FieldLabelModifier '[StripPrefix "_eraSummaryData", LowerFirst]] EraSummaryData
deriving (FromJSON, ToJSON) via CustomJSON '[FieldLabelModifier '[StripPrefix "_eraSummaryData", LowerFirst]] EraSummary

-- | Parameters for a network era which can vary between hardforks.
data EraParameters = EraParameters
Expand Down

0 comments on commit a46e05f

Please sign in to comment.