blockfrost-client 0.9.1.0 → 0.9.2.0
raw patch · 5 files changed
+50/−3 lines, 5 filesdep ~blockfrost-apiPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: blockfrost-api
API changes (from Hackage documentation)
+ Blockfrost.Client: getBlockTxsCBOR :: MonadBlockfrost m => Either Integer BlockHash -> m [TxHashCBOR]
+ Blockfrost.Client: getBlockTxsCBOR' :: MonadBlockfrost m => Either Integer BlockHash -> Paged -> SortOrder -> m [TxHashCBOR]
+ Blockfrost.Client: getLatestBlockTxsCBOR :: MonadBlockfrost m => m [TxHashCBOR]
+ Blockfrost.Client: getLatestBlockTxsCBOR' :: MonadBlockfrost m => Paged -> SortOrder -> m [TxHashCBOR]
+ Blockfrost.Client.Cardano.Blocks: getBlockTxsCBOR :: MonadBlockfrost m => Either Integer BlockHash -> m [TxHashCBOR]
+ Blockfrost.Client.Cardano.Blocks: getBlockTxsCBOR' :: MonadBlockfrost m => Either Integer BlockHash -> Paged -> SortOrder -> m [TxHashCBOR]
+ Blockfrost.Client.Cardano.Blocks: getLatestBlockTxsCBOR :: MonadBlockfrost m => m [TxHashCBOR]
+ Blockfrost.Client.Cardano.Blocks: getLatestBlockTxsCBOR' :: MonadBlockfrost m => Paged -> SortOrder -> m [TxHashCBOR]
Files
- CHANGELOG.md +7/−0
- blockfrost-client.cabal +2/−2
- src/Blockfrost/Client.hs +4/−0
- src/Blockfrost/Client/Cardano/Blocks.hs +36/−0
- src/Blockfrost/Client/Cardano/Pools.hs +1/−1
CHANGELOG.md view
@@ -1,3 +1,10 @@+# Version [0.9.2.0](https://github.com/blockfrost/blockfrost-haskell/compare/client-0.9.1.0...client-0.9.2.0) (2025-04-07)++* Additions+ * `getBlockTxsCBOR` for `/blocks/:hash_or_number/txs/cbor` endpoint [#73](https://github.com/blockfrost/blockfrost-haskell/pull/73) [#75](https://github.com/blockfrost/blockfrost-haskell/pull/75)+ * `getLatestBlockTxsCBOR` for `/blocks/latest/txs/cbor` endpoint [#73](https://github.com/blockfrost/blockfrost-haskell/pull/73) [#75](https://github.com/blockfrost/blockfrost-haskell/pull/75)++ # Version [0.9.1.0](https://github.com/blockfrost/blockfrost-haskell/compare/client-0.9.0.0...client-0.9.1.0) (2024-09-25) * Fix return type of `getTxCBOR` from `[TransactionCBOR]` to `TransactionCBOR`.
blockfrost-client.cabal view
@@ -1,6 +1,6 @@ cabal-version: 2.2 name: blockfrost-client-version: 0.9.1.0+version: 0.9.2.0 synopsis: blockfrost.io basic client description: Simple Blockfrost clients for use with transformers or mtl homepage: https://github.com/blockfrost/blockfrost-haskell@@ -68,7 +68,7 @@ , Blockfrost.Client.IPFS , Blockfrost.Client.NutLink build-depends: base >= 4.7 && < 5- , blockfrost-api >= 0.12.1+ , blockfrost-api >= 0.12.2 , blockfrost-client-core ^>= 0.6 , bytestring , directory
src/Blockfrost/Client.hs view
@@ -60,6 +60,8 @@ , getLatestBlock , getLatestBlockTxs , getLatestBlockTxs'+ , getLatestBlockTxsCBOR+ , getLatestBlockTxsCBOR' , getBlock , getBlockSlot , getBlockEpochSlot@@ -69,6 +71,8 @@ , getPreviousBlocks' , getBlockTxs , getBlockTxs'+ , getBlockTxsCBOR+ , getBlockTxsCBOR' , getBlockAffectedAddresses' , getBlockAffectedAddresses -- Cardano - Epochs
src/Blockfrost/Client/Cardano/Blocks.hs view
@@ -4,6 +4,8 @@ ( getLatestBlock , getLatestBlockTxs , getLatestBlockTxs'+ , getLatestBlockTxsCBOR+ , getLatestBlockTxsCBOR' , getBlock , getBlockSlot , getBlockEpochSlot@@ -13,6 +15,8 @@ , getPreviousBlocks' , getBlockTxs , getBlockTxs'+ , getBlockTxsCBOR+ , getBlockTxsCBOR' , getBlockAffectedAddresses' , getBlockAffectedAddresses ) where@@ -47,6 +51,22 @@ getLatestBlockTxs :: MonadBlockfrost m => m [TxHash] getLatestBlockTxs = getLatestBlockTxs' def def +getLatestBlockTxsCBOR_ :: MonadBlockfrost m => Project -> Paged -> SortOrder -> m [TxHashCBOR]+getLatestBlockTxsCBOR_ = _latestTxsCBOR . blocksClient++-- | Return the transactions within the block, including CBOR.+-- Allows custom paging and ordering using 'Paged' and 'SortOrder'.+getLatestBlockTxsCBOR' :: MonadBlockfrost m => Paged -> SortOrder -> m [TxHashCBOR]+getLatestBlockTxsCBOR' pg s = go (\p -> getLatestBlockTxsCBOR_ p pg s)++-- | Return the transactions within the block, including CBOR.+--+-- Queries 100 entries. To query all entries use 'Blockfrost.Client.Core.allPages'+-- with principled variant of this function (suffixed with @'@)+-- that accepts 'Paged' argument.+getLatestBlockTxsCBOR :: MonadBlockfrost m => m [TxHashCBOR]+getLatestBlockTxsCBOR = getLatestBlockTxsCBOR' def def+ getBlock_ :: MonadBlockfrost m => Project -> Either Integer BlockHash -> m Block getBlock_ = _block . blocksClient @@ -115,6 +135,22 @@ -- that accepts 'Paged' argument. getBlockTxs :: MonadBlockfrost m => Either Integer BlockHash -> m [TxHash] getBlockTxs a = getBlockTxs' a def def++getBlockTxsCBOR_ :: MonadBlockfrost m => Project -> Either Integer BlockHash -> Paged -> SortOrder -> m [TxHashCBOR]+getBlockTxsCBOR_ = _blockTxsCBOR . blocksClient++-- | Return the transactions within the block, including CBOR.+-- Allows custom paging and ordering using 'Paged' and 'SortOrder'.+getBlockTxsCBOR' :: MonadBlockfrost m => Either Integer BlockHash -> Paged -> SortOrder -> m [TxHashCBOR]+getBlockTxsCBOR' a pg s = go (\p -> getBlockTxsCBOR_ p a pg s)++-- | Return the transactions within the block, including CBOR.+--+-- Queries 100 entries. To query all entries use 'Blockfrost.Client.Core.allPages'+-- with principled variant of this function (suffixed with @'@)+-- that accepts 'Paged' argument.+getBlockTxsCBOR :: MonadBlockfrost m => Either Integer BlockHash -> m [TxHashCBOR]+getBlockTxsCBOR a = getBlockTxsCBOR' a def def getBlockAffectedAddresses_ :: MonadBlockfrost m => Project -> Either Integer BlockHash -> Paged -> m [(Address, [TxHash])] getBlockAffectedAddresses_ = _blockAffectedAddresses . blocksClient
src/Blockfrost/Client/Cardano/Pools.hs view
@@ -117,7 +117,7 @@ getPoolHistory p = getPoolHistory' p def def getPoolMetadata_ :: MonadBlockfrost m => Project -> PoolId -> m (Maybe PoolMetadata)-getPoolMetadata_ = _getPoolMetadata . poolsClient+getPoolMetadata_ p pid = getMetadata <$> _getPoolMetadata (poolsClient p) pid -- | Get stake pool metadata getPoolMetadata :: MonadBlockfrost m => PoolId -> m (Maybe PoolMetadata)