Skip to content

Commit 1e84ccb

Browse files
committed
feat(#78): add IsTimestamped and HasCursor instance
1 parent f639aa4 commit 1e84ccb

File tree

1 file changed

+10
-0
lines changed

1 file changed

+10
-0
lines changed

src/Maestro/Types/V1/Assets.hs

Lines changed: 10 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -107,6 +107,16 @@ data TimestampedAssetUTxOs = TimestampedAssetUTxOs
107107
-- ^ See `AssetUTxOs`.
108108
, timestampedAssetUTxOsLastUpdated :: !LastUpdated
109109
-- ^ See `LastUpdated`.
110+
, timestampedAssetUTxOsNextCursor :: !(Maybe NextCursor)
111+
-- ^ See `NextCursor`.
110112
}
111113
deriving stock (Eq, Show, Generic)
112114
deriving (FromJSON, ToJSON) via CustomJSON '[FieldLabelModifier '[StripPrefix "timestampedAssetUTxOs", CamelToSnake]] TimestampedAssetUTxOs
115+
116+
instance IsTimestamped TimestampedAssetUTxOs where
117+
type TimestampedData TimestampedAssetUTxOs = [AssetUTxOs]
118+
getTimestampedData = timestampedAssetUTxOsData
119+
getTimestamp = timestampedAssetUTxOsLastUpdated
120+
121+
instance HasCursor TimestampedAssetUTxOs where
122+
getNextCursor = timestampedAssetUTxOsNextCursor

0 commit comments

Comments
 (0)