haskoin-store-data 0.45.0 → 0.46.1
raw patch · 3 files changed
+41/−10 lines, 3 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
+ Haskoin.Store.Data: BinfoFilterAll :: BinfoFilter
+ Haskoin.Store.Data: BinfoFilterConfirmed :: BinfoFilter
+ Haskoin.Store.Data: BinfoFilterMempool :: BinfoFilter
+ Haskoin.Store.Data: BinfoFilterMoved :: BinfoFilter
+ Haskoin.Store.Data: BinfoFilterReceived :: BinfoFilter
+ Haskoin.Store.Data: BinfoFilterSent :: BinfoFilter
+ Haskoin.Store.Data: data BinfoFilter
+ Haskoin.Store.Data: instance Control.DeepSeq.NFData Haskoin.Store.Data.BinfoFilter
+ Haskoin.Store.Data: instance Data.Serialize.Serialize Haskoin.Store.Data.BinfoFilter
+ Haskoin.Store.Data: instance GHC.Classes.Eq Haskoin.Store.Data.BinfoFilter
+ Haskoin.Store.Data: instance GHC.Generics.Generic Haskoin.Store.Data.BinfoFilter
+ Haskoin.Store.Data: instance GHC.Show.Show Haskoin.Store.Data.BinfoFilter
+ Haskoin.Store.Data: instance Web.Scotty.Action.Parsable Haskoin.Store.Data.BinfoFilter
Files
- CHANGELOG.md +8/−0
- haskoin-store-data.cabal +2/−2
- src/Haskoin/Store/Data.hs +31/−8
CHANGELOG.md view
@@ -4,6 +4,14 @@ The format is based on [Keep a Changelog](http://keepachangelog.com/en/1.0.0/) and this project adheres to [Semantic Versioning](http://semver.org/spec/v2.0.0.html) +## 0.46.1+### Added+- Filters for transactions in multiaddr endpoint.++## 0.46.0+### Fixed+- Release to fix unintentional upload.+ ## 0.45.0 ### Added - Using a tx_index that results in a txid conflict returns a 409 - Conflict.
haskoin-store-data.cabal view
@@ -4,10 +4,10 @@ -- -- see: https://github.com/sol/hpack ----- hash: 593dbf63f1100ec4da73a86f3fcf7ab620207c88317736c11bc679f543a908bd+-- hash: 4d0e46ffd2b1e7753ee56dbcede2298207f4b484b619551ff50ee149aea2d6a8 name: haskoin-store-data-version: 0.45.0+version: 0.46.1 synopsis: Data for Haskoin Store description: Please see the README on GitHub at <https://github.com/haskoin/haskoin-store#readme> category: Bitcoin, Finance, Network
src/Haskoin/Store/Data.hs view
@@ -1,10 +1,11 @@-{-# LANGUAGE DeriveAnyClass #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE FlexibleContexts #-}-{-# LANGUAGE FlexibleInstances #-}-{-# LANGUAGE LambdaCase #-}-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE DeriveAnyClass #-}+{-# LANGUAGE DeriveGeneric #-}+{-# LANGUAGE FlexibleContexts #-}+{-# LANGUAGE FlexibleInstances #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE ScopedTypeVariables #-} module Haskoin.Store.Data ( -- * Address Balances Balance(..)@@ -84,6 +85,7 @@ -- * Blockchain.info API , BinfoTxId(..) , encodeBinfoTxId+ , BinfoFilter(..) , BinfoMultiAddr(..) , binfoMultiAddrToJSON , binfoMultiAddrToEncoding@@ -1600,7 +1602,7 @@ hex = case hexToTxHash (TL.toStrict t) of Nothing -> Left "could not decode txid"- Just h -> Right $ BinfoTxIdHash h+ Just h -> Right $ BinfoTxIdHash h igr = BinfoTxIdIndex <$> parseParam t instance ToJSON BinfoTxId where@@ -1612,6 +1614,27 @@ instance FromJSON BinfoTxId where parseJSON v = BinfoTxIdHash <$> parseJSON v <|> BinfoTxIdIndex <$> parseJSON v++data BinfoFilter+ = BinfoFilterAll+ | BinfoFilterSent+ | BinfoFilterReceived+ | BinfoFilterMoved+ | BinfoFilterConfirmed+ | BinfoFilterMempool+ deriving (Eq, Show, Generic, Serialize, NFData)++instance Parsable BinfoFilter where+ parseParam t =+ parseParam t >>= \case+ (0 :: Int) -> return BinfoFilterAll+ 1 -> return BinfoFilterSent+ 2 -> return BinfoFilterReceived+ 3 -> return BinfoFilterMoved+ 5 -> return BinfoFilterConfirmed+ 6 -> return BinfoFilterAll+ 7 -> return BinfoFilterMempool+ _ -> Left "could not parse filter parameter" data BinfoMultiAddr = BinfoMultiAddr